summaryrefslogtreecommitdiff
path: root/scopetest.prn
blob: c85596fb56b9dd63f3821842bf64f8e06f28fc57 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
@defun "localedit"{
	2 "somevar" store
	"should be 2: " print somevar print lf
}
@defun "globaledit"{
	2 "somevar" gstore
	"should be 2: " print somevar print lf
}
@defun "makex"{
	42 "x" gstore
	"stored " x + " in x" + print lf
}

1 "somevar" store
"should be 1: " print somevar print lf
localedit
"should be 1: " print somevar print lf
globaledit
"should be 2: " print somevar print lf
makex
"globally, x = " x + print lf