require racket async-channel instead of scheme
This commit is contained in:
parent
3ad0c594a9
commit
e64c20d79f
|
@ -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)))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user