write: cannot marshal value that is embedded in compiled code value: #<syntax:/tmp/t.rkt:34:4 e10> context...: /Users/jay/Dev/scm/plt/racket/collects/compiler/../racket/private/more-scheme.rkt:261:28 /Users/jay/Dev/scm/plt/racket/collects/compiler/cm.rkt:455:6 /Users/jay/Dev/scm/plt/racket/collects/racket/private/more-scheme.rkt:148:2: call-with-break-parameterization /Users/jay/Dev/scm/plt/racket/collects/racket/file.rkt:220:5 /Users/jay/Dev/scm/plt/racket/collects/compiler/cm.rkt:363:0: compile-zo* /Users/jay/Dev/scm/plt/racket/collects/compiler/cm.rkt:572:26 /Users/jay/Dev/scm/plt/racket/collects/compiler/cm.rkt:675:14: build /Users/jay/Dev/scm/plt/racket/collects/compiler/cm.rkt:635:0: compile-root /Users/jay/Dev/scm/plt/racket/collects/compiler/cm.rkt:737:4 /Users/jay/Dev/scm/plt/pkgs/compiler-lib/compiler/commands/make.rkt:81:8: for-loop /Users/jay/Dev/scm/plt/pkgs/compiler-lib/compiler/commands/make.rkt: [running body] /Users/jay/Dev/scm/plt/racket/collects/raco/raco.rkt: [running body] /Users/jay/Dev/scm/plt/racket/collects/raco/main.rkt: [running body]
This is when running "raco make" on the file Jay On Thu, Jul 27, 2017 at 3:59 PM, Matthew Flatt <[email protected]> wrote: > What failure do you see? When I run the program, it seems to compile > and run ok. > > At Thu, 27 Jul 2017 15:41:28 -0400, Jay McCarthy wrote: >> I don't understand why the last macro invocation here fails, given >> that m4 shows you can store hasheqs and m5 shows you can store >> identifiers and m1 shows you can store foos. >> >> #lang racket/base >> (require (for-syntax racket/base)) >> (begin-for-syntax >> (struct foo (x y) #:prefab)) >> >> (define-syntax e1 (foo #'e1 2)) >> >> (define-syntax (m1 stx) >> (syntax-case stx () >> [(_ x) >> (quasisyntax (define-syntax x #,(foo #'x 2)))])) >> >> (define-syntax e7 (make-hasheq)) >> >> (define-syntax (m4 stx) >> (syntax-case stx () >> [(_ x) >> (let ([ht (make-hasheq)]) >> (quasisyntax (define-syntax x #,ht)))])) >> (m4 e8) >> >> (define-syntax (m5 stx) >> (syntax-case stx () >> [(_ x) >> (quasisyntax (define-syntax x #,(foo #'x #'x)))])) >> (m5 e9) >> >> (define-syntax (m6 stx) >> (syntax-case stx () >> [(_ x) >> (let ([ht (make-hasheq)]) >> (hash-set! ht 'y #'x) >> (quasisyntax (define-syntax x #,(foo #'x ht))))])) >> (m6 e10) >> >> -- >> -=[ Jay McCarthy http://jeapostrophe.github.io ]=- >> -=[ Associate Professor PLT @ CS @ UMass Lowell ]=- >> -=[ Moses 1:33: And worlds without number have I created; ]=- >> >> -- >> You received this message because you are subscribed to the Google Groups >> "Racket Developers" group. >> To unsubscribe from this group and stop receiving emails from it, send an >> email to [email protected]. >> To post to this group, send email to [email protected]. >> To view this discussion on the web visit >> https://groups.google.com/d/msgid/racket-dev/CAJYbDa%3D2arSqhvknnG1JGPg7aXDALUQ >> DvUEV%3DJSBTMR6CD8psA%40mail.gmail.com. >> For more options, visit https://groups.google.com/d/optout. -- -=[ Jay McCarthy http://jeapostrophe.github.io ]=- -=[ Associate Professor PLT @ CS @ UMass Lowell ]=- -=[ Moses 1:33: And worlds without number have I created; ]=- -- You received this message because you are subscribed to the Google Groups "Racket Developers" group. To unsubscribe from this group and stop receiving emails from it, send an email to [email protected]. To post to this group, send email to [email protected]. To view this discussion on the web visit https://groups.google.com/d/msgid/racket-dev/CAJYbDa%3D9_FWszoPftGVQCzyFcx3qR%2Bv9v4nuz6XZBnzDx%2BxkBQ%40mail.gmail.com. For more options, visit https://groups.google.com/d/optout.
