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

Fix static struct info

Browse Source 
svn: r14433
This commit is contained in:
Sam Tobin-Hochstadt 2009-04-06 06:18:06 +00:00
parent e6277e92ac
commit d57f1a68a4
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/typed-scheme/private/prims.ss
View File

@ -343,7 +343,7 @@ This file defines two sorts of primitives. All of them are provided into any mod
(list #'struct-info (list #'struct-info
#'maker #'maker
#'pred #'pred
(list #'sel ...) (reverse (list #'sel ...))
(list mut ...) (list mut ...)
#f)))) #f))))
#,(internal #'(define-typed-struct-internal nm ([fld : ty] ...) #:type-only)) #,(internal #'(define-typed-struct-internal nm ([fld : ty] ...) #:type-only))