From: Guillermo J. Rozas Date: Sun, 8 Nov 1992 04:23:45 +0000 (+0000) Subject: Remove string->symbol from integrable primitives list. X-Git-Tag: 20090517-FFI~8793 X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=5b9de9d684bbde4f696ab138d7af5022e3794bea;p=mit-scheme.git Remove string->symbol from integrable primitives list. The runtime system version now copies the string if the symbol is being interned for the first time. In this way string mutation of the string does not affect the symbol. --- diff --git a/v7/src/sf/gconst.scm b/v7/src/sf/gconst.scm index 286fd8411..75ee251a3 100644 --- a/v7/src/sf/gconst.scm +++ b/v7/src/sf/gconst.scm @@ -1,8 +1,8 @@ #| -*-Scheme-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/sf/gconst.scm,v 4.13 1992/02/08 15:10:14 cph Exp $ +$Id: gconst.scm,v 4.14 1992/11/08 04:23:45 jinx Exp $ -Copyright (c) 1987-92 Massachusetts Institute of Technology +Copyright (c) 1987-1992 Massachusetts Institute of Technology This material was developed by the Scheme project at the Massachusetts Institute of Technology, Department of Electrical Engineering and @@ -215,7 +215,7 @@ MIT in each case. |# SET-CELL-CONTENTS! SET-INTERRUPT-ENABLES! SET-STRING-LENGTH! - STRING->SYMBOL + ;; STRING->SYMBOL ; Runtime version copies the string STRING-ALLOCATE STRING-HASH STRING-HASH-MOD