Skip to content

Commit 8ea39ea

Browse files
committed
fix an overzealous test case change in c39271c and another bug in 459669f
1 parent c39271c commit 8ea39ea

File tree

2 files changed

+2
-4
lines changed

2 files changed

+2
-4
lines changed

drracket-test/tests/drracket/syncheck-test.rkt

Lines changed: 1 addition & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -579,9 +579,7 @@
579579
("lam" lexically-bound)
580580
("))\n (" default-color)
581581
("require" imported)
582-
(" " default-color)
583-
("'m" unused-require)
584-
(")\n " default-color)
582+
(" 'm)\n " default-color)
585583
("lam" imported)
586584
(")\n" default-color))
587585
'(((10 16) (20 26) (92 99))

drracket-tool-text-lib/drracket/private/syncheck/traversals.rkt

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -529,7 +529,7 @@
529529
(match (syntax->datum raw-module-path)
530530
[`',m
531531
(define we-have-seen-this-sumodule?
532-
(hash-has-key? phase-to-requires (list adjusted-level (cons m mods))))
532+
(hash-has-key? phase-to-requires (list adjusted-level (cons (submodule #f m) mods))))
533533
(if we-have-seen-this-sumodule?
534534
`(submod "." ,m)
535535
`',m)]

0 commit comments

Comments
 (0)