Searched refs:TagTypeC (Results 1 - 6 of 6) sorted by relevance
| /barrelfish-master/usr/eclipseclp/Kernel/src/ |
| H A D | sepia.h | 247 #define TagTypeC(t) ((int8) (t)) macro
248 #define TagType(item_tag) TagTypeC((item_tag).kernel)
251 #define SameTypeC(item_tag,c) (TagType(item_tag) == TagTypeC(c))
254 #define DifferTypeC(item_tag,c) (TagType(item_tag) != TagTypeC(c))
267 #define ISAtomic(tag) (TagTypeC(tag) >= TagTypeC(TSTRG))
295 #define IsTag(t,c) (TagTypeC(t) == TagTypeC(Tag(c)))
296 #define EqTag(t1,t2) (TagTypeC(t1) == TagTypeC(t
[all...] |
| H A D | printam.c | 101 if (TagTypeC((word)(*code)) < 0 || TagTypeC((word)(*code)) > NTYPES) \
104 DidName(tag_desc[TagTypeC((word)(*code))].tag_name), (int)(*code)); \
108 if (TagTypeC((word)(*code)) < 0 || TagTypeC((word)(*code)) > NTYPES) \
111 DidName(tag_desc[TagTypeC((word)(*code))].tag_name)); \
|
| H A D | gc_stacks.c | 235 if (TagTypeC(target_tag) < TMIN || TagTypeC(target_tag) > TMAX)\
243 if (TagTypeC(target_tag) != TDICT)\
247 if (TagTypeC(target_tag) != TDE)\
941 TagTypeC((word) *(tr+2)) == TDE)
1862 else switch(TagTypeC(tag)) /* handling of typed pointers */
2059 switch (TagTypeC(link_or_tag))
2132 (word) TagTypeC(link_or_tag));
|
| H A D | bip_serialize.c | 602 switch (TagTypeC(t))
641 if (TagTypeC(t) == TMETA) {
|
| H A D | emu.c | 63 #undef TagTypeC macro
64 #define TagTypeC(item_tag) ((int8) ((item_tag)&0xff)) macro
950 else if (TagTypeC(tmp1) != TagType(pw2->tag))
967 if (TagTypeC(tmp1) > TCOMP) /* strings, bignums, etc */
978 err_code = tag_desc[TagTypeC(tmp1)].equal(pw1, pw2);
1185 } else if (TagTypeC(tmp1) != TagType(pw2->tag)) {
1200 if (TagTypeC(tmp1) > TCOMP) /* string, bignum etc */
1210 err_code = tag_desc[TagTypeC(tmp1)].equal(pw1, pw2);
2241 err_code = tag_desc[TagTypeC(tmp1)].equal(pw1->val.ptr, PP->ptr);
4539 PP = (PP + TagTypeC(tmp
[all...] |
| H A D | dict.c | 331 return (dident) &dict->tag_did[tag_desc[TagTypeC(t)].super];
|
Completed in 101 milliseconds