Comment out broken place check

2011-08-30 15:54:14 -06:00 · 2011-08-30 15:54:14 -06:00 · b110671c5c
commit b110671c5c
parent 4d8833eab2
1 changed files with 2 additions and 1 deletions
--- a/collects/racket/place.rkt
+++ b/collects/racket/place.rkt
@ -147,7 +147,8 @@
  (syntax-case stx ()
    [(_ ch body1 body ...)
     (begin
-       (unless (eq? 'module (syntax-local-context))
+       ;breaks valid uses of place
+       #;(unless (eq? 'module (syntax-local-context))
         (raise-syntax-error #f "can only be used in a module" stx))
       (unless (identifier? #'ch)
         (raise-syntax-error #f "expected an indentifier" stx #'ch))