[ sisc-Bugs-1093762 ] nested quasiquote broken

Bugs item #1093762, was opened at 2004-12-31 13:38
Message generated for change (Tracker Item Submitted) made by Item Submitter
You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=379534&aid=1093762&group_id=23735

Category: None
Group: None
Status: Open
Resolution: None
Priority: 8
Submitted By: Matthias Radestock (mradestock)
Assigned to: Nobody/Anonymous (nobody)
Summary: nested quasiquote broken

Initial Comment:
the TestR5RS junit tests have thrown up the following
problem:

#;> `(a `(b ,(+ 1 2) ,(foo ,(+ 1 3) d) e) f)
Error: expected 3 argument(s) to #<procedure>, got 2.
?:?:?: <indeterminate call>
?:?:?: <indeterminate call>
?:?:?: <indeterminate call>
?:?:?: <indeterminate call>
?:?:?: <indeterminate call>
?:?:?: <indeterminate call>
?:?:?: <indeterminate call>
?:?:?: <indeterminate call>
?:?:?: <indeterminate call>
?:?:?: <indeterminate call>
?:?:?: <indeterminate call>
?:?:?: <indeterminate call>
?:?:?: <indeterminate call>
?:?:?: <indeterminate call>
file:../modules/hashtable/hashtable.scm:9:24:
<indeterminate call>
?:?:?: <indeterminate call>
file:repl.scm:128:39: <indeterminate call>
file:repl.scm:123:25: <indeterminate call>
file:repl.scm:149:26: <indeterminate call>
file:repl.scm:137:14: <from call to call/cc>
file:repl.scm:136:13: <indeterminate call>

The test is straight from the R5RS text and should return
  (a `(b ,(+ 1 2) ,(foo 4 d) e) f)

[also note the strange stack trace, which looks
completely bogus]

----------------------------------------------------------------------

You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=379534&aid=1093762&group_id=23735


-------------------------------------------------------
The SF.Net email is sponsored by: Beat the post-holiday blues
Get a FREE limited edition SourceForge.net t-shirt from ThinkGeek.
It's fun and FREE -- well, almost....http://www.thinkgeek.com/sfshirt