attempt to work around byecompiler bug
svn: r3360
This commit is contained in:
parent
b4e198bb23
commit
41d79339b9
|
@ -12,6 +12,10 @@
|
|||
)
|
||||
(provide annotate-stx annotate-for-single-stepping)
|
||||
|
||||
(module-identifier=? #'eval/annotations
|
||||
(datum->syntax-object #f 'eval/annotations))
|
||||
|
||||
|
||||
(define (arglist-bindings arglist-stx)
|
||||
(syntax-case arglist-stx ()
|
||||
[var
|
||||
|
|
|
@ -6,6 +6,8 @@
|
|||
(lib "shared.ss" "stepper" "private"))
|
||||
|
||||
(define-struct full-mark-struct (module-name source label bindings values))
|
||||
(module-identifier=? #'skipto-annotate
|
||||
(datum->syntax-object #f 'skipto-annotate))
|
||||
|
||||
; CONTRACTS
|
||||
(define mark? (-> ; no args
|
||||
|
|
Loading…
Reference in New Issue
Block a user