13 lines
153 B
Text
13 lines
153 B
Text
open Nat in
|
|
macro "foo" : command => `(
|
|
#check zero
|
|
#check ``succ)
|
|
|
|
foo
|
|
|
|
macro "bar" : command => `(
|
|
#check zero
|
|
#check ``succ)
|
|
|
|
open Nat in
|
|
bar
|