CurrentRoutineName

Synopsis

     function CurrentRoutineName: String;

Description

CurrentRoutineName returns the name of the current routine from where it's called.

Conforming to

CurrentRoutineName is a GNU Pascal extension.

Example

     program CurrentRoutineNameDemo;
     
     procedure FooBar;
     begin
       WriteLn (CurrentRoutineName)  { `FooBar' }
     end;
     
     begin
       WriteLn (CurrentRoutineName);  { `main program' }
       FooBar
     end.

See also