diff options
Diffstat (limited to 'src/algebra/array1.spad.pamphlet')
| -rw-r--r-- | src/algebra/array1.spad.pamphlet | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/algebra/array1.spad.pamphlet b/src/algebra/array1.spad.pamphlet index 03916478..7fe6df24 100644 --- a/src/algebra/array1.spad.pamphlet +++ b/src/algebra/array1.spad.pamphlet @@ -40,9 +40,7 @@ PrimitiveArray(S:Type): OneDimensionalArrayAggregate S == add setSimpleArrayEntry(x,i,s)$Lisp fill!(x, s) == - for i in 0..maxIndexOfSimpleArray(x)$Lisp repeat - setSimpleArrayEntry(x, i, s)$Lisp - x + FILL(x,s)$Foreign(Builtin) @ |