Miroirs/aocla
1
0
Fork 0
mirror of https://github.com/antirez/aocla synced 2024-12-26 09:58:42 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Tuples are only made of lowercase single letters.

Browse source
This commit is contained in:
antirez 2022-12-19 17:18:18 +01:00
parent 4a0f0bb206
commit 0dcacdcf06
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
aocla.c
View file

@ -176,12 +176,13 @@ obj *parseList(aoclactx *ctx, const char *s, const char **next) {
return NULL;
} else if (o->type == OBJ_TYPE_TUPLE &&
(element->type != OBJ_TYPE_SYMBOL ||
element->sym.len != 1))
element->sym.len != 1 ||
!islower(element->sym.ptr[0])))
{
/* Tuples can be only composed of one character symbols. */
release(element);
release(o);
setError(ctx,s,"Non symbol object in tuple");
setError(ctx,s,"Non lower case letter in tuple");
return NULL;
}
o->l.ele = myrealloc(o->l.ele, sizeof(obj*)*(o->l.len+1));