expander: fix an error message
This commit is contained in:
parent
14448eb1bd
commit
13242b06d6
|
@ -252,7 +252,7 @@
|
|||
(lambda (s)
|
||||
(raise-arguments-error 'datum->syntax
|
||||
"cannot create syntax from cyclic datum"
|
||||
s))))
|
||||
"datum" s))))
|
||||
|
||||
;; ----------------------------------------
|
||||
|
||||
|
|
|
@ -6078,7 +6078,7 @@ static const char *startup_source =
|
|||
"(disallow-cycles)"
|
||||
"(hasheq"
|
||||
" 'cycle-fail"
|
||||
" (lambda (s_64) (raise-arguments-error 'datum->syntax \"cannot create syntax from cyclic datum\" s_64))))"
|
||||
" (lambda (s_64) (raise-arguments-error 'datum->syntax \"cannot create syntax from cyclic datum\" \"datum\" s_64))))"
|
||||
"(define-values"
|
||||
"(struct:syntax-state"
|
||||
" syntax-state19.1"
|
||||
|
|
Loading…
Reference in New Issue
Block a user