diff options
Diffstat (limited to 'src/interp/format.boot')
| -rw-r--r-- | src/interp/format.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/format.boot b/src/interp/format.boot index 9fa054d5..fd0763e2 100644 --- a/src/interp/format.boot +++ b/src/interp/format.boot @@ -579,7 +579,7 @@ linearFormat x == [linearFormat y for y in x] numOfSpadArguments id == - char "*" = (s:= PNAME id).0 => + char "*" = stringChar(s:= PNAME id,0) => +/[n for i in 1.. while integer? (n:=readInteger PNAME s.i)] keyedSystemError("S2IF0012",[id]) |