RE: Bit Operations

Missed the closing parentheses:

*IN50 = (%BITAND(CHAR:BIT0) = BIT0);
*IN51 = (%BITAND(CHAR:BIT1) = BIT1);
*IN52 = (%BITAND(CHAR:BIT2) = BIT2);
*IN53 = (%BITAND(CHAR:BIT3) = BIT3);
*IN54 = (%BITAND(CHAR:BIT4) = BIT4);
*IN55 = (%BITAND(CHAR:BIT5) = BIT5);
*IN56 = (%BITAND(CHAR:BIT6) = BIT6);
*IN57 = (%BITAND(CHAR:BIT7) = BIT7);

The extra set of parentheses aren't strictly necessary, but I like to
use them to differentiate between the equal sign on the left that is
doing an EVAL, and the one on the right which is doing a comparison.  It
works with or without them.  However, it doesn't work at all if you
don't have balanced parentheses.

Joe

> From: Joe Pluta
> 
> *IN50 = (%BITAND(CHAR:BIT0) = BIT0;
> *IN51 = (%BITAND(CHAR:BIT1) = BIT1;
> *IN52 = (%BITAND(CHAR:BIT2) = BIT2;
> *IN53 = (%BITAND(CHAR:BIT3) = BIT3;
> *IN54 = (%BITAND(CHAR:BIT4) = BIT4;
> *IN55 = (%BITAND(CHAR:BIT5) = BIT5;
> *IN56 = (%BITAND(CHAR:BIT6) = BIT6;
> *IN57 = (%BITAND(CHAR:BIT7) = BIT7;