From: Henry M. Wu Date: Tue, 26 May 1992 17:50:35 +0000 (+0000) Subject: Added compress. X-Git-Tag: 20090517-FFI~9366 X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=421bb17697040680439dc5fce7b3c4fb4eda7489;p=mit-scheme.git Added compress. --- diff --git a/v7/src/runtime/runtime.pkg b/v7/src/runtime/runtime.pkg index d507786ce..e8c82b98d 100644 --- a/v7/src/runtime/runtime.pkg +++ b/v7/src/runtime/runtime.pkg @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/runtime.pkg,v 14.151 1992/05/26 17:40:49 mhwu Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/runtime.pkg,v 14.152 1992/05/26 17:50:35 mhwu Exp $ Copyright (c) 1988-92 Massachusetts Institute of Technology @@ -267,6 +267,9 @@ MIT in each case. |# dbg-procedure/source-code dbg-expression? ) + (export (runtime compress) + uncompress-internal + ) (initialization (initialize-package!))) (define-package (runtime console-i/o-port) diff --git a/v8/src/runtime/runtime.pkg b/v8/src/runtime/runtime.pkg index a2e870960..c7d52fde9 100644 --- a/v8/src/runtime/runtime.pkg +++ b/v8/src/runtime/runtime.pkg @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/runtime/runtime.pkg,v 14.151 1992/05/26 17:40:49 mhwu Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/runtime/runtime.pkg,v 14.152 1992/05/26 17:50:35 mhwu Exp $ Copyright (c) 1988-92 Massachusetts Institute of Technology @@ -267,6 +267,9 @@ MIT in each case. |# dbg-procedure/source-code dbg-expression? ) + (export (runtime compress) + uncompress-internal + ) (initialization (initialize-package!))) (define-package (runtime console-i/o-port)