From 045eca2db4c0862b3c9f86a33b95b79e8fe308fa Mon Sep 17 00:00:00 2001 From: "Guillermo J. Rozas" Date: Fri, 15 Sep 1989 18:10:43 +0000 Subject: [PATCH] Fix bug in 1d-table/alist, and add 1d-table/for-each. --- v7/src/runtime/runtime.pkg | 6 ++++-- v8/src/runtime/runtime.pkg | 6 ++++-- 2 files changed, 8 insertions(+), 4 deletions(-) diff --git a/v7/src/runtime/runtime.pkg b/v7/src/runtime/runtime.pkg index 357ad308f..8cce4077f 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.50 1989/08/17 14:51:12 cph Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/runtime.pkg,v 14.51 1989/09/15 18:10:43 jinx Exp $ Copyright (c) 1988, 1989 Massachusetts Institute of Technology @@ -88,7 +88,9 @@ MIT in each case. |# (define-package (runtime 1d-property) (files "prop1d") (parent ()) - (export () 1d-table/alist + (export () + 1d-table/for-each + 1d-table/alist 1d-table/get 1d-table/lookup 1d-table/put! diff --git a/v8/src/runtime/runtime.pkg b/v8/src/runtime/runtime.pkg index 758bf0077..b2c8304b2 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.50 1989/08/17 14:51:12 cph Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/runtime/runtime.pkg,v 14.51 1989/09/15 18:10:43 jinx Exp $ Copyright (c) 1988, 1989 Massachusetts Institute of Technology @@ -88,7 +88,9 @@ MIT in each case. |# (define-package (runtime 1d-property) (files "prop1d") (parent ()) - (export () 1d-table/alist + (export () + 1d-table/for-each + 1d-table/alist 1d-table/get 1d-table/lookup 1d-table/put! -- 2.25.1