The Cross-Platform xBase.
Version 3.0
INIT
/EXIT PROCEDURE
supportTesting INIT
/EXIT PROCEDURE
and initialization of static variables.
$ hbrun initexit.prg Hello from: Third() global static= 10001.15 Hello from: SecondOne() global static= 10002.15 Hello from: Main() global static= 10003.15 PUBLIC variable created in INIT PROCEDURE= p_initStatics Hello from: Fifth() global static= 10002.15 Hello from: Sixth() global static= 10001.15
To learn how to build/run this example, see this page.