suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

cs: update for LZ4 compression

Browse Source
This commit is contained in:
Matthew Flatt 2019-03-20 20:42:01 -06:00
parent 8910ff0a39
commit d0a98cb42a
9 changed files with 21 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Makefile
View File

@ -389,6 +389,7 @@ clone-ChezScheme-as-extra:
cd $(BUILD_FOR_FOR_SCHEME_DIR)/ChezScheme && git clone $(GIT_CLONE_ARGS_qq) $(EXTRA_REPOS_BASE)nanopass/.git cd $(BUILD_FOR_FOR_SCHEME_DIR)/ChezScheme && git clone $(GIT_CLONE_ARGS_qq) $(EXTRA_REPOS_BASE)nanopass/.git
cd $(BUILD_FOR_FOR_SCHEME_DIR)/ChezScheme && git clone $(GIT_CLONE_ARGS_qq) $(EXTRA_REPOS_BASE)stex/.git cd $(BUILD_FOR_FOR_SCHEME_DIR)/ChezScheme && git clone $(GIT_CLONE_ARGS_qq) $(EXTRA_REPOS_BASE)stex/.git
cd $(BUILD_FOR_FOR_SCHEME_DIR)/ChezScheme && git clone $(GIT_CLONE_ARGS_qq) $(EXTRA_REPOS_BASE)zlib/.git cd $(BUILD_FOR_FOR_SCHEME_DIR)/ChezScheme && git clone $(GIT_CLONE_ARGS_qq) $(EXTRA_REPOS_BASE)zlib/.git
cd $(BUILD_FOR_FOR_SCHEME_DIR)/ChezScheme && git clone $(GIT_CLONE_ARGS_qq) $(EXTRA_REPOS_BASE)lz4/.git
WIN32_CS_COPY_ARGS_EXCEPT_PKGS_SUT = SRC_CATALOG="$(SRC_CATALOG)" RACKETCS_SUFFIX="$(RACKETCS_SUFFIX)" \ WIN32_CS_COPY_ARGS_EXCEPT_PKGS_SUT = SRC_CATALOG="$(SRC_CATALOG)" RACKETCS_SUFFIX="$(RACKETCS_SUFFIX)" \
SCHEME_SRC="$(SCHEME_SRC)" EXTRA_REPOS_BASE="$(EXTRA_REPOS_BASE)" SCHEME_SRC="$(SCHEME_SRC)" EXTRA_REPOS_BASE="$(EXTRA_REPOS_BASE)"

2
pkgs/base/info.rkt
View File

@ -12,7 +12,7 @@
(define collection 'multi) (define collection 'multi)
(define version "7.2.0.10") (define version "7.2.0.11")
(define deps `("racket-lib" (define deps `("racket-lib"
["racket" #:version ,version])) ["racket" #:version ,version]))

5
racket/src/cs/c/Makefile.in
View File

@ -22,6 +22,7 @@ LIBS = @LIBS@
AR = @AR@ AR = @AR@
ARFLAGS = @ARFLAGS@ ARFLAGS = @ARFLAGS@
RANLIB = @RANLIB@ RANLIB = @RANLIB@
WINDRES = @WINDRES@
STRIP_DEBUG = @STRIP_DEBUG@ STRIP_DEBUG = @STRIP_DEBUG@
STRIP_LIB_DEBUG = @STRIP_LIB_DEBUG@ STRIP_LIB_DEBUG = @STRIP_LIB_DEBUG@
@ -130,7 +131,9 @@ scheme:
if [ "$(MAKE_BUILD_SCHEME)" = "y" ] ; \ if [ "$(MAKE_BUILD_SCHEME)" = "y" ] ; \
then $(MAKE) scheme-make ; fi then $(MAKE) scheme-make ; fi
SCHEME_CONFIG_VARS = CC="$(CC)" CFLAGS="$(BASE_CFLAGS)" LD="$(LD)" LDFLAGS="$(LDFLAGS)" AR="$(AR)" ARFLAGS="$(ARFLAGS)" RANLIB="$(RANLIB)" SCHEME_CONFIG_VARS = CC="$(CC)" CFLAGS="$(BASE_CFLAGS)" LD="$(LD)" LDFLAGS="$(LDFLAGS)" \
AR="$(AR)" ARFLAGS="$(ARFLAGS)" RANLIB="$(RANLIB)" \
WINDRES="$(WINDRES)"
scheme-make: scheme-make:
cd $(SCHEME_SRC) && git submodule -q init && git submodule -q update cd $(SCHEME_SRC) && git submodule -q init && git submodule -q update

7
racket/src/cs/c/configure vendored
View File

@ -1398,7 +1398,7 @@ Optional Features:
--enable-standalone create a standalone shared library --enable-standalone create a standalone shared library
--enable-pthread link with pthreads (usually auto-enabled if needed) --enable-pthread link with pthreads (usually auto-enabled if needed)
--enable-iconv use iconv (usually auto-enabled) --enable-iconv use iconv (usually auto-enabled)
--enable-compress compress compiled code --enable-compress compress compiled code (enabled by default)
--enable-origtree install with original directory structure --enable-origtree install with original directory structure
--enable-pkgscope=<s> set `raco pkg' default: installation, user, or shared --enable-pkgscope=<s> set `raco pkg' default: installation, user, or shared
--enable-docs build docs on install (enabled by default) --enable-docs build docs on install (enabled by default)
@ -2502,7 +2502,7 @@ show_explicitly_set()
show_explicitly_enabled "${enable_pthread}" "pthreads" show_explicitly_enabled "${enable_pthread}" "pthreads"
show_explicitly_disabled "${enable_pthread}" "pthreads" show_explicitly_disabled "${enable_pthread}" "pthreads"
show_explicitly_enabled "${enable_compress}" "Compressed code" show_explicitly_disabled "${enable_compress}" "Compressed code"
show_explicitly_enabled "${enable_xonx}" "Unix style" show_explicitly_enabled "${enable_xonx}" "Unix style"
show_explicitly_set "${enable_racket}" "Racket" show_explicitly_set "${enable_racket}" "Racket"
show_explicitly_set "${enable_scheme}" "Chez Scheme build directory" show_explicitly_set "${enable_scheme}" "Chez Scheme build directory"
@ -4132,7 +4132,7 @@ fi
SCHEME_CONFIG_ARGS="--machine=${MACH} --disable-x11 ${disable_curses_arg} ${extra_scheme_config_args}" SCHEME_CONFIG_ARGS="--machine=${MACH} --disable-x11 ${disable_curses_arg} ${extra_scheme_config_args}"
SCHEME_CROSS_CONFIG_ARGS="--machine=${TARGET_MACH} --disable-x11 ${disable_curses_arg} ${extra_scheme_config_args}" SCHEME_CROSS_CONFIG_ARGS="--machine=${TARGET_MACH} --disable-x11 ${disable_curses_arg} ${extra_scheme_config_args}"
if test "${enable_compress}" = "yes" ; then if test "${enable_compress}" != "no" ; then
COMPRESS_COMP="--compress" COMPRESS_COMP="--compress"
fi fi
@ -4919,6 +4919,7 @@ SUB_CONFIGURE_EXTRAS="${SUB_CONFIGURE_EXTRAS} LDFLAGS="'"'"${LDFLAGS}"'"'
SUB_CONFIGURE_EXTRAS="${SUB_CONFIGURE_EXTRAS} AR="'"'"${AR}"'"' SUB_CONFIGURE_EXTRAS="${SUB_CONFIGURE_EXTRAS} AR="'"'"${AR}"'"'
SUB_CONFIGURE_EXTRAS="${SUB_CONFIGURE_EXTRAS} ARFLAGS="'"'"${ARFLAGS}"'"' SUB_CONFIGURE_EXTRAS="${SUB_CONFIGURE_EXTRAS} ARFLAGS="'"'"${ARFLAGS}"'"'
SUB_CONFIGURE_EXTRAS="${SUB_CONFIGURE_EXTRAS} RANLIB="'"'"${RANLIB}"'"' SUB_CONFIGURE_EXTRAS="${SUB_CONFIGURE_EXTRAS} RANLIB="'"'"${RANLIB}"'"'
SUB_CONFIGURE_EXTRAS="${SUB_CONFIGURE_EXTRAS} WINDRES="'"'"${WINDRES}"'"'
############## final output ################ ############## final output ################

7
racket/src/cs/c/configure.ac
View File

@ -16,7 +16,7 @@ AC_ARG_ENABLE(shared, [ --enable-shared create shared libraries (ok
AC_ARG_ENABLE(standalone, [ --enable-standalone create a standalone shared library]) AC_ARG_ENABLE(standalone, [ --enable-standalone create a standalone shared library])
AC_ARG_ENABLE(pthread, [ --enable-pthread link with pthreads (usually auto-enabled if needed)]) AC_ARG_ENABLE(pthread, [ --enable-pthread link with pthreads (usually auto-enabled if needed)])
AC_ARG_ENABLE(iconv, [ --enable-iconv use iconv (usually auto-enabled)]) AC_ARG_ENABLE(iconv, [ --enable-iconv use iconv (usually auto-enabled)])
AC_ARG_ENABLE(compress, [ --enable-compress compress compiled code]) AC_ARG_ENABLE(compress, [ --enable-compress compress compiled code (enabled by default)])
m4_include(../ac/path_arg.m4) m4_include(../ac/path_arg.m4)
AC_ARG_ENABLE(racket, [ --enable-racket=<path> use <path> as Racket to build; or "auto" to create]) AC_ARG_ENABLE(racket, [ --enable-racket=<path> use <path> as Racket to build; or "auto" to create])
AC_ARG_ENABLE(scheme, [ --enable-scheme=<path> Chez Scheme build directory at <path>]) AC_ARG_ENABLE(scheme, [ --enable-scheme=<path> Chez Scheme build directory at <path>])
@ -57,7 +57,7 @@ show_explicitly_set()
show_explicitly_enabled "${enable_pthread}" "pthreads" show_explicitly_enabled "${enable_pthread}" "pthreads"
show_explicitly_disabled "${enable_pthread}" "pthreads" show_explicitly_disabled "${enable_pthread}" "pthreads"
show_explicitly_enabled "${enable_compress}" "Compressed code" show_explicitly_disabled "${enable_compress}" "Compressed code"
show_explicitly_enabled "${enable_xonx}" "Unix style" show_explicitly_enabled "${enable_xonx}" "Unix style"
show_explicitly_set "${enable_racket}" "Racket" show_explicitly_set "${enable_racket}" "Racket"
show_explicitly_set "${enable_scheme}" "Chez Scheme build directory" show_explicitly_set "${enable_scheme}" "Chez Scheme build directory"
@ -385,7 +385,7 @@ fi
SCHEME_CONFIG_ARGS="--machine=${MACH} --disable-x11 ${disable_curses_arg} ${extra_scheme_config_args}" SCHEME_CONFIG_ARGS="--machine=${MACH} --disable-x11 ${disable_curses_arg} ${extra_scheme_config_args}"
SCHEME_CROSS_CONFIG_ARGS="--machine=${TARGET_MACH} --disable-x11 ${disable_curses_arg} ${extra_scheme_config_args}" SCHEME_CROSS_CONFIG_ARGS="--machine=${TARGET_MACH} --disable-x11 ${disable_curses_arg} ${extra_scheme_config_args}"
if test "${enable_compress}" = "yes" ; then if test "${enable_compress}" != "no" ; then
COMPRESS_COMP="--compress" COMPRESS_COMP="--compress"
fi fi
@ -570,6 +570,7 @@ SUB_CONFIGURE_EXTRAS="${SUB_CONFIGURE_EXTRAS} LDFLAGS="'"'"${LDFLAGS}"'"'
SUB_CONFIGURE_EXTRAS="${SUB_CONFIGURE_EXTRAS} AR="'"'"${AR}"'"' SUB_CONFIGURE_EXTRAS="${SUB_CONFIGURE_EXTRAS} AR="'"'"${AR}"'"'
SUB_CONFIGURE_EXTRAS="${SUB_CONFIGURE_EXTRAS} ARFLAGS="'"'"${ARFLAGS}"'"' SUB_CONFIGURE_EXTRAS="${SUB_CONFIGURE_EXTRAS} ARFLAGS="'"'"${ARFLAGS}"'"'
SUB_CONFIGURE_EXTRAS="${SUB_CONFIGURE_EXTRAS} RANLIB="'"'"${RANLIB}"'"' SUB_CONFIGURE_EXTRAS="${SUB_CONFIGURE_EXTRAS} RANLIB="'"'"${RANLIB}"'"'
SUB_CONFIGURE_EXTRAS="${SUB_CONFIGURE_EXTRAS} WINDRES="'"'"${WINDRES}"'"'
############## final output ################ ############## final output ################

1
racket/src/cs/compile-file.ss
View File

@ -46,6 +46,7 @@
(unless (eq? (vector-ref v 0) (vector-ref v 1)) (unless (eq? (vector-ref v 0) (vector-ref v 1))
(error 'eq-on-flonum "no"))))) (error 'eq-on-flonum "no")))))
(check-defined 'procedure-known-single-valued?) (check-defined 'procedure-known-single-valued?)
(check-defined 'compress-format)
;; ---------------------------------------- ;; ----------------------------------------

4
racket/src/racket/src/schvers.h
View File

@ -13,12 +13,12 @@
consistently.) consistently.)
*/ */
#define MZSCHEME_VERSION "7.2.0.10" #define MZSCHEME_VERSION "7.2.0.11"
#define MZSCHEME_VERSION_X 7 #define MZSCHEME_VERSION_X 7
#define MZSCHEME_VERSION_Y 2 #define MZSCHEME_VERSION_Y 2
#define MZSCHEME_VERSION_Z 0 #define MZSCHEME_VERSION_Z 0
#define MZSCHEME_VERSION_W 10 #define MZSCHEME_VERSION_W 11
#define MZSCHEME_VERSION_MAJOR ((MZSCHEME_VERSION_X * 100) + MZSCHEME_VERSION_Y) #define MZSCHEME_VERSION_MAJOR ((MZSCHEME_VERSION_X * 100) + MZSCHEME_VERSION_Y)
#define MZSCHEME_VERSION_MINOR ((MZSCHEME_VERSION_Z * 1000) + MZSCHEME_VERSION_W) #define MZSCHEME_VERSION_MINOR ((MZSCHEME_VERSION_Z * 1000) + MZSCHEME_VERSION_W)

1
racket/src/worksp/cs/prep.rkt
View File

@ -43,6 +43,7 @@
(copy-one-dir "mats") (copy-one-dir "mats")
(copy-one-dir "nanopass") (copy-one-dir "nanopass")
(copy-one-dir "zlib") (copy-one-dir "zlib")
(copy-one-dir "lz4")
(copy-one-dir (build-path "boot" machine-name)) (copy-one-dir (build-path "boot" machine-name))
(define config-h (build-path dir machine-name "c" "config.h")) (define config-h (build-path dir machine-name "c" "config.h"))

4
racket/src/worksp/csbuild.rkt
View File

@ -84,7 +84,9 @@
(clone (format "~astex/.git" extra-repos-base) (clone (format "~astex/.git" extra-repos-base)
(build-path scheme-dir "stex")) (build-path scheme-dir "stex"))
(clone (format "~azlib/.git" extra-repos-base) (clone (format "~azlib/.git" extra-repos-base)
(build-path scheme-dir "zlib"))] (build-path scheme-dir "zlib"))
(clone (format "~alz4/.git" extra-repos-base)
(build-path scheme-dir "lz4"))]
[else [else
(clone "https://github.com/mflatt/ChezScheme" (clone "https://github.com/mflatt/ChezScheme"
scheme-dir scheme-dir