Searched refs:ttypep (Results 1 – 3 of 3) sorted by relevance
201 extern int ttypep(Obj *x);
1227 …((typ == UTYP) ? utypep(x) : ((typ == MTYP) ? mtypep(x) : ((typ == TTYP) ? ttypep(x) : atypep(x))))1487 } else if (ttypep(types) || (consp(types) && ttypep(car(types)))) { in add_properties()1581 if (ttypep(types)) { in add_to_ttypes()1590 TYPECHECK(ttypep, carlis1, "not a terrain type"); in add_to_ttypes()1600 TYPECHECK(ttypep, carlis1, "not a terrain type"); in add_to_ttypes()1880 if (symbolp(typesym) && ttypep(typeval = eval(typesym))) { in fill_in_aux_terrain()2055 if (symbolp(val) && ttypep(typeval = eval(val))) { in add_to_area()2841 if (!ttypep(typeval)) { in read_aux_terrain_view_layer()3331 if (boundp(sym) && ttypep(symbol_value(sym))) in ttype_from_name()
858 ttypep(Obj *x) in ttypep() function