racket/collects/tests/honu/macros2.honu
2011-11-22 10:30:44 -07:00

26 lines
262 B
Plaintext

#lang honu
macro foo (){ x:identifier }{
syntax(macro x (){ e:expression }{
syntax(e + 2)
})
}
foo h
h 5
h 8 * 9
test(z){
macro foo (){ x:identifier }{
syntax(macro x (){ e:expression }{
syntax(e + z)
})
}
foo h
h 5
}
test(4)