diff options
Diffstat (limited to 'src/interp/bc-util.boot')
| -rw-r--r-- | src/interp/bc-util.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/bc-util.boot b/src/interp/bc-util.boot index 7f69eeb8..74b2e0ec 100644 --- a/src/interp/bc-util.boot +++ b/src/interp/bc-util.boot @@ -97,9 +97,9 @@ bcString2WordList s == fn(s,0,maxIndex s) where fn(s,i,n) == i > n => nil k := or/[j for j in i..n | s.j ~= char " "] - null integer? k => nil + not integer? k => nil l := bcFindString(s,k + 1,n,char " ") - null integer? l => [subString(s,k)] + not integer? l => [subString(s,k)] [subString(s,k,l-k),:fn(s,l + 1,n)] |