This commit is contained in:
ceriel
1988-07-26 09:53:47 +00:00
parent dbbff76f4c
commit b1dc8c8f52
2 changed files with 2 additions and 3 deletions

View File

@@ -174,8 +174,8 @@ typedef short t_reps,*p_reps;
*/
# define r_getkind(q) ((q)->t_repeats&03)
# define r_getnum(q) (((q)->t_repeats>>2)&037777)
# define r_setkind(q,s) { assert(((unsigned)(s))<=03);(q)->t_repeats=((q)->t_repi&0177774)|(s);}
# define r_setnum(q,s) { assert(((unsigned)(s))<=037777);(q)->t_repeats=((q)->t_repi&03)|((s)<<2);}
# define r_setkind(q,s) { assert(((unsigned)(s))<=03);(q)->t_repeats=((q)->t_repeats&0177774)|(s);}
# define r_setnum(q,s) { assert(((unsigned)(s))<=037777);(q)->t_repeats=((q)->t_repeats&03)|((s)<<2);}
/*
* header structure for a term