6776 struct block *gen_relation(code, a0, a1, reversed)  in gen_relation()  argument
6778      struct arth *a0, *a1;
6784     s0 = xfer_to_x(a1);
6798     sappend(a1->s, s0);
6799     sappend(a0->s, a1->s);
6804     free_reg(a1->regno);
6809         if (a1->b)
6811             gen_and(a0->b, tmp = a1->b);
6817         tmp = a1->b;
6878 struct arth *gen_arth(code, a0, a1)  in gen_arth()  argument
6880      struct arth *a0, *a1;
6884     s0 = xfer_to_x(a1);
6890     sappend(a1->s, s0);
6891     sappend(a0->s, a1->s);
6894     free_reg(a1->regno);