Missing source annotations
Affects | Status | Importance | Assigned to | Milestone | |
---|---|---|---|---|---|
Ikarus Scheme |
Fix Committed
|
Medium
|
Abdulaziz Ghuloum |
Bug Description
Hi
Currently, annotated-
Here is the most obvious one:
Case 1:
(define-syntax define-fx
(lambda (x)
(syntax-case x ()
[(_ (name formals ...) body body* ...)
(map (lambda (f)
#'(define (name formals ...)
(let ()
(define-fx (fx+ x1 x2)
(+ x1 x2))
Case 2 (simplest macro):
(define-syntax add
(syntax-rules ()
[(_ n ...) (+ n ...)]))
(add 1 2 3) ; <-- annotated call 'loses' info
Case 3:
(define-syntax define*
(syntax-rules ()
[(_ n e ...)
(define n (lambda () e ...))]))
I will add more as I find them, or can reproduce them.
Cheers
leppie
Fixed this case in revision 1789.