allow TSetOf to be sequence types too

This commit is contained in:
Love Hornquist Astrand
2010-08-10 10:33:25 -07:00
parent b11217838e
commit 49aea1f0b3

View File

@@ -47,8 +47,8 @@ generate_type_seq (const Symbol *s)
while(type->type == TTag)
type = type->subtype;
if (type->type != TSequenceOf) {
printf("%s not seq of %d\n", s->name, (int)type->type);
if (type->type != TSequenceOf && type->type != TSetOf) {
fprintf(stderr, "%s not seq of %d\n", s->name, (int)type->type);
return;
}