sysfn cleanup

This commit is contained in:
dzaima 2022-04-03 17:38:06 +03:00
parent a9331ef8f0
commit 4ed2d0bec2

View File

@ -239,7 +239,7 @@ B show_c1(B t, B x) {
static B vfyStr(B x, char* name, char* arg) {
if (isAtm(x) || rnk(x)!=1) thrF("%U: %U must be a character vector", name, arg);
if (a(x)->type!=t_c32arr && a(x)->type!=t_c32slice) {
if (!elChr(TI(x,elType))) {
usz ia = a(x)->ia;
SGetU(x)
for (usz i = 0; i < ia; i++) if (!isC32(GetU(x,i))) thrF("%U: %U must be a character vector", name, arg);