[racket-dev] [plt] Push #22500: master branch updated

An alternative patch that keeps places enabled but uses processes for build.

diff --git a/collects/setup/parallel-do.rkt b/collects/setup/parallel-do.rkt
index 00823fe..2716c2a 100644
--- a/collects/setup/parallel-do.rkt
+++ b/collects/setup/parallel-do.rkt
@@ -168,7 +168,8 @@
                                   (find-system-path 'orig-dir))))))

  (define (parallel-do-event-loop module-path funcname initialmsg 
jobqueue nprocs [stopat #f])
-  (define use-places (place-enabled?))
+;  (define use-places (place-enabled?))
+  (define use-places #f)
    (define (spawn id)
      (define wrkr (if use-places (new PlaceWorker%) (new Worker%)))
      (wrkr/spawn wrkr id module-path funcname initialmsg)



On 04/21/2011 06:13 AM, mflatt at racket-lang.org wrote:
> mflatt has updated `master' from 2177681336 to 8760d38a95.
>    http://git.racket-lang.org/plt/2177681336..8760d38a95
>
> =====[ 1 Commits ]======================================================
>
> Directory summary:
>    38.9% src/racket/
>    12.4% src/worksp/
>    48.6% src/
>
> ~~~~~~~~~~
>
> 8760d38 Matthew Flatt<mflatt at racket-lang.org>  2011-04-21 06:12
> :
> | disable places-by-default for now
> |  --- pending further investigation of memory consumption
> :
>    M src/configure           |   12 ++++++------
>    M src/racket/configure.ac |   12 ++++++------
>    M src/worksp/mzconfig.h   |    2 +-
>
> =====[ Overall Diff ]===================================================
>
> src/configure
> ~~~~~~~~~~~~~
> --- OLD/src/configure
> +++ NEW/src/configure
> @@ -1327,7 +1327,7 @@ Optional Features:
>     --enable-jit            compile JIT support (enabled by default)
>     --enable-foreign        compile foreign support (enabled by default)
>     --enable-libffi         use installed libffi (enabled by default)
> -  --enable-places         compile places support (usually enabled by default)
> +  --enable-places         compile places support
>     --enable-futures        compile futures support (usually enabled by default)
>     --enable-cgcdefault     use CGC (Boehm or Senora) as default build
>     --enable-sgc            use Senora GC instead of the Boehm GC
> @@ -8255,11 +8255,11 @@ fi
>
>   ############### places ###################
>
> -if test "${enable_parallel_by_default}" = "yes" ; then
> -  if test "${enable_places}" = "" ; then
> -    enable_places=yes
> -  fi
> -fi
> +#if test "${enable_parallel_by_default}" = "yes" ; then
> +#  if test "${enable_places}" = "" ; then
> +#    enable_places=yes
> +#  fi
> +#fi
>
>   if test "${enable_places}" = "yes" ; then
>
>
> src/racket/configure.ac
> ~~~~~~~~~~~~~~~~~~~~~~~
> --- OLD/src/racket/configure.ac
> +++ NEW/src/racket/configure.ac
> @@ -38,7 +38,7 @@ AC_ARG_ENABLE(jit,     [  --enable-jit            compile JIT support (enabled b
>   AC_ARG_ENABLE(foreign, [  --enable-foreign        compile foreign support (enabled by default)], , enable_foreign=yes)
>   AC_ARG_ENABLE(libffi,  [  --enable-libffi         use installed libffi (enabled by default)], , enable_libffi=yes)
>
> -AC_ARG_ENABLE(places,  [  --enable-places         compile places support (usually enabled by default)])
> +AC_ARG_ENABLE(places,  [  --enable-places         compile places support])
>   AC_ARG_ENABLE(futures, [  --enable-futures        compile futures support (usually enabled by default)])
>
>   AC_ARG_ENABLE(cgcdefault, [  --enable-cgcdefault     use CGC (Boehm or Senora) as default build])
> @@ -1006,11 +1006,11 @@ fi
>
>   ############### places ###################
>
> -if test "${enable_parallel_by_default}" = "yes" ; then
> -  if test "${enable_places}" = "" ; then
> -    enable_places=yes
> -  fi
> -fi
> +#if test "${enable_parallel_by_default}" = "yes" ; then
> +#  if test "${enable_places}" = "" ; then
> +#    enable_places=yes
> +#  fi
> +#fi
>
>   if test "${enable_places}" = "yes" ; then
>     AC_DEFINE(MZ_USE_PLACES,1,[Places enabled])
>
> src/worksp/mzconfig.h
> ~~~~~~~~~~~~~~~~~~~~~
> --- OLD/src/worksp/mzconfig.h
> +++ NEW/src/worksp/mzconfig.h
> @@ -42,7 +42,7 @@
>   #define MZ_USE_FUTURES
>
>   /* Enable places: */
> -#define MZ_USE_PLACES
> +/*#define MZ_USE_PLACES*/
>
>   /* Enable single-precision floats: */
>   #define USE_SINGLE_FLOATS