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