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

I broke this test; I am not sure why it worked in the first place -- to be checked

Browse Source
This commit is contained in:
Matthias Felleisen 2014-08-01 21:42:39 -04:00
parent 42426272c2
commit 6782f7a85f
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
pkgs/htdp-pkgs/htdp-test/tests/htdp-lang/pr/12117.rkt
View File

@ -1,6 +1,5 @@
#lang htdp/bsl #lang htdp/asl
(require racket/match) (require racket/match)
(define-struct a (b)) (define-struct a (b))
(match (make-a 1) (match (make-a 1) [(struct a (b)) b] [#f 3])
[(struct a (b)) b]
[#f 3])