Lines Matching defs:sforms
1733 LispMused(alist->optionals.sforms);
1738 LispMused(alist->keys.sforms);
1756 LispFree(alist->optionals.sforms);
1761 LispFree(alist->keys.sforms);
1959 REALLOC_OBJECTS(alist->keys.sforms, count + 1);
1963 alist->keys.sforms[count] = sform;
1995 REALLOC_OBJECTS(alist->optionals.sforms, count + 1);
1998 alist->optionals.sforms[count] = sform;
2098 REALLOC_OBJECTS(alist->keys.sforms, count + 1);
2102 alist->keys.sforms[count] = NULL;
2113 REALLOC_OBJECTS(alist->optionals.sforms, count + 1);
2116 alist->optionals.sforms[count] = NULL;
4037 LispObj **symbols, **defaults, **sforms;
4144 sforms = alist->optionals.sforms;
4164 if (sforms[i]) {
4165 NORMAL_ARGUMENT(sforms[i], T);
4172 if (sforms[i]) {
4173 NORMAL_ARGUMENT(sforms[i], T);
4193 if (sforms[i]) {
4194 NORMAL_ARGUMENT(sforms[i], NIL);
4240 sforms = alist->keys.sforms;
4364 if (sforms[i]) {
4365 NORMAL_ARGUMENT(sforms[i], T);
4399 if (sforms[i]) {
4400 NORMAL_ARGUMENT(sforms[i], NIL);
4410 sforms = alist->keys.sforms;
4453 if (sforms[i]) {
4454 NORMAL_ARGUMENT(sforms[i], T);
4472 if (sforms[i]) {
4473 NORMAL_ARGUMENT(sforms[i], NIL);