Files
harbour-core/harbour/tests/working/byref.prg
Antonio Linares 974bc2fbc2 make files
1999-05-05 05:45:23 +00:00

21 lines
199 B
Plaintext

// Managing variables by reference
function Main()
local x := 0
QOut( "Managing variables by reference" )
ref( @x )
QOut( x )
return nil
function ref( x )
x := 999
return nil