Ejemplo n.º 1
0
Archivo: t-logic.c Proyecto: mbk/ren-c
*/	REBFLG MT_Logic(REBVAL *out, REBVAL *data, REBCNT type)
/*
***********************************************************************/
{
	if (!IS_INTEGER(data)) return FALSE;
	SET_LOGIC(out, VAL_INT64(data) != 0);
	return TRUE;
}
Ejemplo n.º 2
0
void set_output() {
   //SET_LOGIC(SIG_OUT, 1);
   //SET_LOGIC(SIG_OUT, !(GET_LOGIC(SIG_IN1) && GET_LOGIC(SIG_IN2)));
   SET_LOGIC(SIG_OUT,
      !( GET_LOGIC(SIG_IN1)
      && GET_LOGIC(SIG_IN2)
      && GET_LOGIC(SIG_IN3)
      && GET_LOGIC(SIG_IN4)
      && GET_LOGIC(SIG_IN5)
      && GET_LOGIC(SIG_IN6)
      && GET_LOGIC(SIG_IN7)
      && GET_LOGIC(SIG_IN8)
      )
    ); // Initializes output
}