9687850865
* (all files)
* stripped svn header
* minor cleanups
; use following command to find out the history of files:
git log
git log --follow
git blame
git annotate
22 lines
399 B
Plaintext
22 lines
399 B
Plaintext
// Statics overlapped!
|
|
//
|
|
// Compile statics1.prg, statics2.prg and link both files
|
|
|
|
STATIC uA, uB
|
|
|
|
PROCEDURE Test()
|
|
|
|
? "INSIDE statics2.prg"
|
|
? " static uA, uB"
|
|
?
|
|
? " ValType( uA ), ValType( uB ) =>", ValType( uA ), ",", ValType( uB )
|
|
? " uA, uB =>", uA, ",", uB
|
|
uA := "a"
|
|
uB := "b"
|
|
? ' uA := "a"'
|
|
? ' uB := "b"'
|
|
? " uA, uB =>", uA, ",", uB
|
|
?
|
|
|
|
RETURN
|