Anonymous user
Undefined values: Difference between revisions
m
+output, comment
m (+output, comment) |
|||
Line 26:
<lang Unicon>global G1
procedure main(arglist)
local
static MS1
undeftest()
end
Line 35 ⟶ 36:
local L1,L2
every #write all local, parameter, static, and global variable names
write((localnames|paramnames|staticnames|globalnames)(¤t,0)) # ... visible in the current co-expression at this calling level (0)
return
end</lang>
The output looks like:
<pre>L1
L2
P1
S1
main
undeftest
write
localnames
paramnames
staticnames
globalnames</pre>
Note that ML1,arglist, and MS1 are not listed. Also note, that procedures names are just global variables of type procedure.
=={{header|J}}==
|