1
0
Fork 0
mirror of https://github.com/ganelson/inform.git synced 2024-07-16 22:14:23 +03:00
inform7/inter/Tests/General/Primitives.intert

22 lines
498 B
Plaintext
Raw Normal View History

2019-02-05 02:44:07 +02:00
package main _plain
2022-02-23 01:31:47 +02:00
typename K_number = int32
typename K_phrase_number____nothing = function K_number -> void
2022-03-14 15:53:55 +02:00
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