From ac576027569518ffffd63a5a1681d92fdc1a9ea5 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Mon, 9 Jun 2014 17:38:29 -0700 Subject: [PATCH] remove dependency on 'describe' --- debug.rkt | 9 +-------- info.rkt | 3 +-- 2 files changed, 2 insertions(+), 10 deletions(-) diff --git a/debug.rkt b/debug.rkt index 5696849..b1e715c 100644 --- a/debug.rkt +++ b/debug.rkt @@ -1,15 +1,8 @@ #lang racket/base -(provide report describe) +(provide report) (define-syntax-rule (report var) (begin (displayln (format "~a = ~v" 'var var) (current-error-port)) var)) - -(require (prefix-in williams: describe)) - -(define (describe x) - (parameterize ([current-output-port (current-error-port)]) - (williams:describe x)) - x) \ No newline at end of file diff --git a/info.rkt b/info.rkt index fce4e2b..c7cdb5d 100644 --- a/info.rkt +++ b/info.rkt @@ -1,4 +1,3 @@ #lang info (define collection "sugar") -(define scribblings '(("scribblings/sugar.scrbl" (multi-page)))) -(define deps '("describe")) \ No newline at end of file +(define scribblings '(("scribblings/sugar.scrbl" (multi-page)))) \ No newline at end of file