You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
12 lines
374 B
Racket
12 lines
374 B
Racket
3 years ago
|
#lang racket/base
|
||
|
|
(require (prefix-in 1: yaragg/examples/top-level-cut-1)
|
||
|
|
(prefix-in 2: yaragg/examples/top-level-cut-2)
|
||
|
|
(prefix-in 3: yaragg/examples/top-level-cut-3)
|
||
|
|
yaragg/support
|
||
|
|
rackunit)
|
||
|
|
|
||
|
|
(check-equal? (1:parse-to-datum "x") '((sub "x")))
|
||
|
|
(check-equal? (2:parse-to-datum "x") '(("x")))
|
||
|
|
(check-equal? (3:parse-to-datum "x") '("x"))
|
||
|
|
|