199905-26-22: Les Griffith changelog
This commit is contained in:
@@ -1,3 +1,8 @@
|
||||
19990526-22:53 Les Griffith
|
||||
* added Bil Simser's gtapi.h to include
|
||||
and the c files to source\rtl
|
||||
* added to doc Bil's documentation re gtapi
|
||||
|
||||
19990526-20:45 EST David G. Holm <dholm@jsd-llc.com>
|
||||
* ChangeLog
|
||||
- Removed excess whitespace from previous ChangeLog entry
|
||||
|
||||
Binary file not shown.
@@ -2,16 +2,22 @@
|
||||
|
||||
function main
|
||||
local a := 10
|
||||
local b := "X"
|
||||
|
||||
qout('a := 10',a)
|
||||
testfun(@a)
|
||||
qout('return of reference should = 20',a,iif(a == 20,"worked","failed"))
|
||||
qout('b := "X"',b)
|
||||
|
||||
testfun(@a, @b)
|
||||
qout('return of "a" should = 20',a,iif(a == 20,"worked","failed"))
|
||||
qout('return of "b" should = A',b,iif(b == "A","worked","failed"))
|
||||
|
||||
return nil
|
||||
|
||||
function testfun(b)
|
||||
function testfun(b,c)
|
||||
b := b + 10
|
||||
qout('pointer+10 =',b)
|
||||
c := "A"
|
||||
qout('a pointer+10 =',b)
|
||||
qout('b pointer := "A" =',c)
|
||||
|
||||
return nil
|
||||
|
||||
|
||||
Reference in New Issue
Block a user