Update of /cvsroot/wisp/wisp/src/builtin
In directory usw-pr-cvs1:/tmp/cvs-serv4287/src/builtin
Modified Files:
dictbase.wisp stdenv.wisp
Log Message:
Dropped |string-ref|.
Index: dictbase.wisp
===================================================================
RCS file: /cvsroot/wisp/wisp/src/builtin/dictbase.wisp,v
retrieving revision 1.237
retrieving revision 1.238
diff -u -d -r1.237 -r1.238
--- dictbase.wisp 7 Sep 2002 21:53:10 -0000 1.237
+++ dictbase.wisp 7 Sep 2002 21:54:05 -0000 1.238
@@ -139,7 +139,6 @@
(local string-fill! (asm NN_string_fill))
(local string-length (asm NN_string_length))
(local string-move! (asm NN_string_move))
-(local string-ref (asm NN_string_ref))
(local string? (asm NN_string_huh))
(local symbol? (asm NN_symbol_huh))
(local sys:exit (asm NN_sys_exit))
Index: stdenv.wisp
===================================================================
RCS file: /cvsroot/wisp/wisp/src/builtin/stdenv.wisp,v
retrieving revision 1.359
retrieving revision 1.360
diff -u -d -r1.359 -r1.360
--- stdenv.wisp 4 Sep 2002 14:38:13 -0000 1.359
+++ stdenv.wisp 7 Sep 2002 21:54:05 -0000 1.360
@@ -82,16 +82,16 @@
string->integer string->list string->number string->symbol
string-append string-concatenate string-copy
string-downcase string-downcase! string-fill! string-join
- string-length string-move! string-null? string-ref
- string-template string-upcase string-upcase! string<=?
- string<? string=? string>=? string>? string?
- structure->string sub subclass? substring superclass swap!
- swyde? symbol->string symbol-length symbol-ref symbol<=?
- symbol<? symbol>=? symbol>? symbol? system-constant
- tcchangeattr tcgetattr tcgetattr-raw tcsetattr-raw tenth
- third toposplit translate tree-copy truncate try tty? type
- type-of ubyte? unix-time unpack-be-integer
- unpack-le-integer unsure-collect use utf-8->c16string
+ string-length string-move! string-null? string-template
+ string-upcase string-upcase! string<=? string<? string=?
+ string>=? string>? string? structure->string sub subclass?
+ substring superclass swap! swyde? symbol->string
+ symbol-length symbol-ref symbol<=? symbol<? symbol>=?
+ symbol>? symbol? system-constant tcchangeattr tcgetattr
+ tcgetattr-raw tcsetattr-raw tenth third toposplit
+ translate tree-copy truncate try tty? type type-of ubyte?
+ unix-time unpack-be-integer unpack-le-integer
+ unsure-collect use utf-8->c16string
utf-8-first-byte->length uwyde? vector vector->list
vector-append vector-copy vector-fill! vector-length
vector-move! vector-ref vector? void? wisp-string-hash
|
