Test program change
This commit is contained in:
@@ -3,9 +3,18 @@
|
||||
//
|
||||
// This program adds a .HRB at run-time
|
||||
//
|
||||
// Compile Spawn2() before compiling Spawn()
|
||||
//
|
||||
// Should be compiled using /gHRB or stub.
|
||||
//
|
||||
function Main()
|
||||
|
||||
QOut( "We are now in spawn" )
|
||||
HB_Run( "Hello.hrb" ) // Load & Run Hello.hrb
|
||||
HB_Run( "Spawn2.hrb" ) // Load & Run Hello.hrb
|
||||
QOut( "We are back again" )
|
||||
return nil
|
||||
|
||||
function SomeWhereElse()
|
||||
|
||||
QOut( "I am being called from somewhere else" )
|
||||
return nil
|
||||
|
||||
10
harbour/tests/working/spawn2.prg
Normal file
10
harbour/tests/working/spawn2.prg
Normal file
@@ -0,0 +1,10 @@
|
||||
//
|
||||
// Spawn2 called from Spawn
|
||||
//
|
||||
function Main()
|
||||
|
||||
QOut( "Hi, I am Spawn2" )
|
||||
QOut( "Let's call a function from Spawn()" )
|
||||
SomeWhereElse()
|
||||
QOut( "Back to Spawn2" )
|
||||
return nil
|
||||
Reference in New Issue
Block a user