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
28 lines
488 B
Plaintext
28 lines
488 B
Plaintext
// Statics overlapped!
|
|
//
|
|
// Compile statics1.prg, statics2.prg and link both files
|
|
|
|
STATIC uOne, uTwo
|
|
|
|
PROCEDURE Main()
|
|
|
|
? "Statics overlapped!"
|
|
? "==================="
|
|
?
|
|
? "INSIDE statics1.prg"
|
|
? " static uOne, uTwo"
|
|
?
|
|
? " uOne, uTwo =>", uOne, ",", uTwo
|
|
uOne := 1
|
|
uTwo := 2
|
|
? " uOne := 1"
|
|
? " uOne := 2"
|
|
? " uOne, uTwo =>", uOne, ",", uTwo
|
|
?
|
|
Test()
|
|
? "INSIDE statics1.prg"
|
|
? " uOne, uTwo =>", uOne, ",", uTwo
|
|
?
|
|
|
|
RETURN
|