.
original commit: aa19749bb33cb757a5b6f331669eb0f9f76304d5
This commit is contained in:
parent
d383f01ff7
commit
ada948ed61
|
@ -508,7 +508,6 @@
|
|||
(hash-table-put! ht key val) ...
|
||||
ht)))]
|
||||
[_else (raise-syntax-error 'hash-table "bad syntax" stx)]))]))
|
||||
|
||||
|
||||
(define-syntax (begin-with-definitions stx)
|
||||
;; Body can have mixed exprs and defns. Wrap expressions with
|
||||
|
|
|
@ -1,4 +1,6 @@
|
|||
|
||||
;; by Jacob Matthews
|
||||
|
||||
(module struct mzscheme
|
||||
(provide copy-struct)
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user