2019-07-13 13:03:54 +03:00
|
|
|
package main _plain
|
2022-02-13 01:27:30 +02:00
|
|
|
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
|
