syntax/parse: change test to use eval so no error logged when compiled

pkgs/racket-test/tests/stxparse/info.rkt

@@ -1,4 +1,3 @@
 #lang info
 
 (define test-responsibles '((all ryanc)))
-(define compile-omit-files '("test.rkt"))

pkgs/racket-test/tests/stxparse/test.rkt

@@ -647,17 +647,25 @@
 (tok (1 . (2 3)) (~datum (1 . (2 3))) 'ok)
 
 ;; nullable EH pattern raises error on match (rather than diverging) (7/2016)
+(let ()
+  ;; to make drdr happy: use eval because compiling this code currently logs an error
+  (define ns (make-base-namespace))
+  (eval '(require syntax/parse) ns)
   (tcerr "nullable"
-  (syntax-parse #'(1 2 3)
+    (eval
+     '(syntax-parse #'(1 2 3)
         [((~seq) ... n:nat ...) 'ok])
+     ns)
     #rx"nullable ellipsis-head pattern|ellipsis-head pattern matched an empty sequence")
   (tcerr "nullable (dynamic)"
-  (let ()
+    (eval
+     '(let ()
         (define-splicing-syntax-class empty
           (pattern (~seq)))
         (syntax-parse #'(1 2 3)
           [((~seq e:empty) ... n:nat ...) 'ok]))
-  #rx"ellipsis-head pattern matched an empty sequence")
+     ns)
+    #rx"ellipsis-head pattern matched an empty sequence"))
 
 ;; nullable but bounded EH pattern ok (thanks Alex Knauth) (7/2016)
 (tok (1 2 3) ((~once (~seq)) ... n:nat ...) 'ok)