removed hacks now that PR 8112 is resolved

svn: r3497
This commit is contained in:
Matthew Flatt 2006-06-27 14:02:01 +00:00
parent 6706befaa3
commit a334558f62
2 changed files with 0 additions and 6 deletions

View File

@ -12,10 +12,6 @@
) )
(provide annotate-stx annotate-for-single-stepping) (provide annotate-stx annotate-for-single-stepping)
(module-identifier=? #'eval/annotations
(datum->syntax-object #f 'eval/annotations))
(define (arglist-bindings arglist-stx) (define (arglist-bindings arglist-stx)
(syntax-case arglist-stx () (syntax-case arglist-stx ()
[var [var

View File

@ -6,8 +6,6 @@
(lib "shared.ss" "stepper" "private")) (lib "shared.ss" "stepper" "private"))
(define-struct full-mark-struct (module-name source label bindings values)) (define-struct full-mark-struct (module-name source label bindings values))
(module-identifier=? #'skipto-annotate
(datum->syntax-object #f 'skipto-annotate))
; CONTRACTS ; CONTRACTS
(define mark? (-> ; no args (define mark? (-> ; no args