require racket async-channel instead of scheme

This commit is contained in:
Patrick Mahoney 2012-08-21 19:50:23 -04:00 committed by Gregory Cooper
parent 3ad0c594a9
commit e64c20d79f

View File

@ -1,7 +1,7 @@
#lang racket #lang racket
(require "contract.rkt" (require "contract.rkt"
"match.rkt" "match.rkt"
scheme/async-channel) racket/async-channel)
; XXX More efficient structure ; XXX More efficient structure
(define (snoc x l) (append l (list x))) (define (snoc x l) (append l (list x)))