diff options
| author | dos-reis <gdr@axiomatics.org> | 2012-05-23 02:49:30 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2012-05-23 02:49:30 +0000 |
| commit | a8faa740f1e13fce63ac23326a227655bca7a0b2 (patch) | |
| tree | a4d6165c93449b677aaaa45e609131546198fb1b /src/interp | |
| parent | eae4d54c648d019b9db583b4e8d2c432f8d7bb16 (diff) | |
| download | open-axiom-a8faa740f1e13fce63ac23326a227655bca7a0b2.tar.gz | |
* boot/tokens.boot (%Token): New datatype.
(makeToken): New.
* boot/includer.boot: Use %token accessors.
* boot/parser.boot: Likewise.
* boot/pile.boot: Likewise.
* boot/scanner.boot: Likewise.
* boot/utility.boot: Export subString.
Diffstat (limited to 'src/interp')
| -rw-r--r-- | src/interp/sys-utility.boot | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/src/interp/sys-utility.boot b/src/interp/sys-utility.boot index 7e4e738a..5a527962 100644 --- a/src/interp/sys-utility.boot +++ b/src/interp/sys-utility.boot @@ -339,12 +339,6 @@ writeByteToStreamSocket(s,b) == makeByteBuffer(n,b == 0) == MAKE_-ARRAY(n,KEYWORD::ELEMENT_-TYPE,"%Byte",KEYWORD::INITIAL_-ELEMENT,b) -++ return the sub-string of `s' starting from `f'. -++ When non-nil, `n' designates the length of the sub-string. -subString(s,f,n == nil) == - n = nil => subSequence(s,f) - subSequence(s,f,f + n) - ++ Return the position of the symbol `s' in the list `l', if present. ++ Otherwise return nil. symbolPosition(s,l) == |