Tip of the day: Calling function name
Function CallingFunction() As string
// Query name of calling function of a function
#Pragma BreakOnExceptions false
try
// raise a dummy exception
dim r as new NilObjectException
raise r
catch x as NilObjectException
// get stack
dim stack() as string = x.Stack
// pick function name and return
dim name as string = stack(2)
Return name
end try
End Function
The name is encoded name including parameter hints for the compiler.