diff options
Diffstat (limited to 'functions.c')
| -rw-r--r-- | functions.c | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/functions.c b/functions.c index 5fafa2a..9649e27 100644 --- a/functions.c +++ b/functions.c @@ -567,16 +567,6 @@ fnMatch(Array *left, Array *right) Array * fnIndex(Array *left, Array *right) { - /* - 1) depth must be ≤ 2 - 2) type of data must be integer - 3) all integers must be ≥ ⎕IO - 4) left must be a scalar or vector - 5) if ≢left < ≢right, left is extended: - leftModified←left⍪⍳¨(≢left)↓⍴right - 6) Result shape ≡ ↑,/⍴¨leftModified - */ - int io = currentsymtab->io; int i; |