void GAP_AssList(Obj list, UInt pos, Obj val) { if (val) ASS_LIST(list, pos, val); else UNB_LIST(list, pos); }
Obj FuncALL_KEYWORDS(Obj self) { Obj l = NewEmptyPlist(); for (UInt i = 0; i < ARRAY_SIZE(AllKeywords); i++) { Obj s = MakeImmString(AllKeywords[i]); ASS_LIST(l, i+1, s); } MakeImmutable(l); return l; }