redex: temporary fix for undefined change

Allows `redex` to start, but the check for an undefined value needs
to be removed or adjusted.
This commit is contained in:
Matthew Flatt 2014-04-15 16:39:14 -06:00
parent df436b0c88
commit aa43797b63

View File

@ -1,11 +1,13 @@
#lang racket/base
(require "error.rkt")
(require "error.rkt"
racket/undefined)
(provide check-defined-lexical
check-defined-module)
(define (check-defined-lexical value name desc)
(when (eq? (letrec ([x x]) x) value)
;; Needed?
(when (eq? undefined value)
(report-undefined name desc)))
(define (check-defined-module thunk name desc)