1
0
Fork 0
mirror of https://github.com/ganelson/inform.git synced 2024-07-09 02:24:21 +03:00
inform7/inter/Tests/General/SimpleRoutines.intert
2019-07-20 12:40:27 +01:00

30 lines
794 B
Plaintext

packagetype _plain
packagetype _code
package main _plain
package resources _plain
kind K_unchecked unchecked
kind K_unchecked_function function K_unchecked -> K_unchecked
package Falsity_B _code
code
splat &"return false;"
constant Falsity K_unchecked_function = Falsity_B
package Demo_B _code
symbol private misc x
symbol private misc y
symbol external misc K_unchecked
local x K_unchecked
local y K_unchecked
code
splat &"return x+y;"
constant Demo K_unchecked_function = Demo_B
package Prop_Falsity_B _code
symbol private misc reason
symbol private misc obj
symbol external misc K_unchecked
local reason K_unchecked
local obj K_unchecked
code
splat &"return 0;"
constant Prop_Falsity K_unchecked_function = Prop_Falsity_B