mirror of
https://github.com/ganelson/inform.git
synced 2024-07-08 10:04:21 +03:00
27 lines
493 B
Plaintext
27 lines
493 B
Plaintext
package main _plain
|
|
kind K_number int32
|
|
kind K_phrase_number____nothing function K_number -> void
|
|
package MyRoutine_B _code
|
|
local (/main/K_number) x
|
|
local (/main/K_number) y
|
|
code
|
|
inv !return
|
|
val x
|
|
.useless
|
|
inv !return
|
|
inv !plus
|
|
val x
|
|
val y
|
|
inv !return
|
|
inv !minus
|
|
val x
|
|
val y
|
|
inv !jump
|
|
lab .useful
|
|
.useful
|
|
inv !return
|
|
inv !modulo
|
|
val x
|
|
val y
|
|
constant (K_phrase_number____nothing) MyRoutine = function MyRoutine_B
|