suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

redex: temporary fix for undefined change

Browse Source 
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
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
pkgs/redex-pkgs/redex-lib/redex/private/defined-checks.rkt
View File

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