1
0
Fork 0
mirror of https://github.com/ganelson/inform.git synced 2024-07-03 07:24:58 +03:00
inform7/inter/Tests/General/Primitives.intert
2022-03-14 13:53:55 +00:00

22 lines
498 B
Plaintext

package main _plain
typename K_number = int32
typename K_phrase_number____nothing = function K_number -> void
package MyRoutine _code
local (/main/K_number) x
local (/main/K_number) y
code
inv !return
val (/main/K_number) x
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 !return
inv !modulo
val (/main/K_number) x
val (/main/K_number) y