diff options
Diffstat (limited to 'functions.c')
-rw-r--r-- | functions.c | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/functions.c b/functions.c index f2b0d83..09e4917 100644 --- a/functions.c +++ b/functions.c @@ -106,7 +106,7 @@ fndyad dyadfunctiondefs[] = { 0, /* ∪ */ 0, /* ∩ */ 0, /* ~ */ - 0, /* , */ + fnCatenateLast, /* , */ fnCatenateFirst, /* ⍪ */ fnReshape, /* ⍴ */ 0, /* ⌽ */ @@ -1034,6 +1034,12 @@ fnIndex(Array *left, Array *right) } Array * +fnCatenateLast(Array *left, Array *right) +{ + return rundfn(L"⍉(⍉⍺)⍪⍉⍵", left, right); +} + +Array * fnCatenateFirst(Array *left, Array *right) { Array *leftarr = nil; |