conditional.sample « samples - slam-interpreter.git -

summary refs log tree commit diff stats

path: root/samples/conditional.sample

blob: 2cb932638794b9f2793d0f02d66410d65194c2e1 (plain)

define eq10?
    10 eq?
        [ "true" ]
        [ "false" ] cond ;

10 eq10? s.
5 eq10? s.