racket/collects/tests/honu/macros2.honu

26 lines
271 B
Plaintext

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