9 lines
309 B
Text
9 lines
309 B
Text
|
x: module -- line 1
|
||
|
p:proc (t char (20) varying); -- 2
|
||
|
writetext(stdout, t); -- 3
|
||
|
end p; -- 4
|
||
|
-- 5
|
||
|
p("Jason Dark.%/"); -- 6
|
||
|
p("Hello World.%/"); -- 7
|
||
|
end x;
|