// Parse and translate a Boolean factor
 private void BoolFactor()
 {
     if (Cradle.IsBoolean(Cradle.Look))
     {
         if (Cradle.GetBoolean())
             Cradle.EmitLn("MOVE #-1,D0");
         else
             Cradle.EmitLn("CLR D0");
     }
     Relation();
 }