This is the mail archive of the
kawa@sources.redhat.com
mailing list for the Kawa project.
StackOverflowError in defmacro
- From: Chris Dean <ctdean at sokitomi dot com>
- To: Kawa List <kawa at sources dot redhat dot com>
- Date: Tue, 04 May 2004 14:52:29 -0700
- Subject: StackOverflowError in defmacro
I'm having some trouble isolating a bug in Kawa that my code exercises.
It's difficult to come up with an isolated test case, so I am wondering
if anyone seen this before and give me a hint that would help track it
down?
On the latest CVS kawa, when I'm using a defmacro macro I get a
StackOverflowError that I didn't get on older versions of Kawa.
A fragment of the offending code and the stack trace are below.
Regards,
Chris Dean
at gnu.expr.ModuleBody.apply1(ModuleBody.java:127)
at com.merced.util.scheme.TestFramework.apply1(com/merced/util/scheme/TestFramework.scm)
at gnu.expr.ModuleBody.applyN(ModuleBody.java:171)
at com.merced.util.scheme.TestFramework.applyN(com/merced/util/scheme/TestFramework.scm)
at gnu.expr.ModuleBody.apply1(ModuleBody.java:127)
...
(defmacro define-test-body (name-form . test-form)
(let ((name (car name-form)))
(receive
(prop-pairs body)
(extract-prop-body test-form)
`(define-simple-class ,name
(<com.merced.service.testing.SingleTest>)
,@(append-map build-property prop-pairs)
((do-test
(test-res
:: <com.merced.service.testing.TestResult>)) :: <void>
,@body)))))