mirror of
https://github.com/ganelson/inform.git
synced 2024-07-08 18:14:21 +03:00
32 lines
1.1 KiB
Plaintext
32 lines
1.1 KiB
Plaintext
primitive !return val -> void
|
|
primitive !plus val val -> val
|
|
|
|
package main _plain
|
|
kind K_unchecked unchecked
|
|
kind K_unchecked_function function K_unchecked -> K_unchecked
|
|
kind K_unchecked_list list of K_unchecked
|
|
kind K_int32 int32
|
|
kind K_int2 int2
|
|
constant VERB_DIRECTIVE_DIVIDER K_unchecked = 1
|
|
constant VERB_DIRECTIVE_RESULT K_unchecked = 2
|
|
package template _module
|
|
splat CONSTANT &"Constant DEBUG;\n"
|
|
splat CONSTANT &"Constant Badger = 12;\n"
|
|
splat ROUTINE &"[ Falsity; return false; ];\n"
|
|
splat ROUTINE &"[ Demo x y; return x+y; ];\n"
|
|
splat ARRAY &"Array XA --> 2 4 56;\n"
|
|
splat ARRAY &"Array XB--> (71 + 3);\n"
|
|
splat ARRAY &"Array XC -> 17 91;\n"
|
|
splat ARRAY &"Array XD-> 8 6;\n"
|
|
splat ARRAY &"Array XE table 2 3 4 5;\n"
|
|
splat ARRAY &"Array XF buffer 6 7 8 9;\n"
|
|
splat CONSTANT &"Constant Bodger $$10011101;\n"
|
|
splat CONSTANT &"Constant Budger $7fe2 ;\n"
|
|
splat GLOBAL &"Global nitwit = 2;\n"
|
|
splat DEFAULT &"Default Bodger = 77;\n"
|
|
splat DEFAULT &"Default Bydger = 777;\n"
|
|
splat STUB &"#Stub Banana 2;\n"
|
|
splat STUB &"#Stub Peach 0;\n"
|
|
splat ATTRIBUTE &"Attribute marmorial;\n"
|
|
splat PROPERTY &"Property density;\n"
|