--------------------------
set someHandler to double
set resultOfSomeHandler to someHandler(4)
log resultOfSomeHandler --> 8
set aValue to "3"
set resultOfCall to call(double, 4)
log resultOfCall --> 8
--------------------------
on double(aNumber)
return aNumber * 2
end double
--------------------------
on call(someHandler, aValue)
someHandler(aValue)
end call
--------------------------