From 90583ce5725fc81c2916543d0331b3ac81769792 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Thu, 19 Jan 2012 13:12:38 -0700 Subject: [PATCH] adjust `raco ctool --c-mods' and related to work with places That is, the generated declare_modules() function registers the module-declaration code so that it is run in any new place, too. Merge to 5.2.1 original commit: 481e0614401ec0b3269a4e258cd9966de7775dce --- collects/compiler/zo-parse.rkt | 2 +- collects/tests/racket/embed-place.rkt | 7 +++++++ 2 files changed, 8 insertions(+), 1 deletion(-) create mode 100644 collects/tests/racket/embed-place.rkt diff --git a/collects/compiler/zo-parse.rkt b/collects/compiler/zo-parse.rkt index 0f8ecde12e..9a61c7f2af 100644 --- a/collects/compiler/zo-parse.rkt +++ b/collects/compiler/zo-parse.rkt @@ -1061,7 +1061,7 @@ (define rst-start (file-position port)) (file-position port (+ rst-start size*)) - + (unless (eof-object? (read-byte port)) (error 'zo-parse "File too big")) diff --git a/collects/tests/racket/embed-place.rkt b/collects/tests/racket/embed-place.rkt new file mode 100644 index 0000000000..46e33a7483 --- /dev/null +++ b/collects/tests/racket/embed-place.rkt @@ -0,0 +1,7 @@ +#lang racket/base +(require racket/place) + +(provide go) + +(define (go ch) + (place-channel-put ch 42))