fix ∾˝⎉k refcounting

This commit is contained in:
dzaima 2024-07-15 00:41:40 +03:00
parent a9f59b5793
commit a9fbd0301d
2 changed files with 6 additions and 1 deletions

View File

@ -494,7 +494,7 @@ B insert_cells_join(B x, usz* xsh, ur cr, ur k) {
shcpy(rsh->a+k+1, xsh+k+2, cr-2);
Arr* r = TI(x,slice)(x, 0, IA(x));
arr_shSetUG(r, rr, rsh);
decG(x); return taga(r);
return taga(r);
}
B insert_cells_identity(B x, B f, usz* xsh, ur xr, ur k, u8 rtid) {
B id;

View File

@ -65,6 +65,11 @@
!"´: Argument must be a list (3‿3 ≡ ≢𝕩)" % +´˘23318
!"´: 𝕩 must be a list (3‿3 ≡ ≢𝕩)" % 1+´˘23318
!"˝: 𝕩 must have rank at least 1" % +˝˘˘1010100
!"˝: 𝕩 must have rank at least 1" % ˝¯2 239
{˝˘ (×´) 2+𝕩}¨ 2345 %% (×´)¨ 23,212,2125,21256
{˝˘ (2+𝕩)<"hi"}¨ 2345 %% (<"hi")¨ 23,212,2125,21256
{˝¯2 (×´) 2+𝕩}¨ 345 %% (×´)¨ 234,2320,23206
%USE tcc 2, 20, ¯2, ¯20, 0 {𝕨 _tcc 𝕩 𝕨 _tcc 𝕩} <4, 5, 4520, 456120
%USE tcc <, , , {𝕎 _tcc 𝕩} <4, 5, 4520, 456120, 2345120