stage4/generate_c/generate_c_il.cc
changeset 834 783ef40344dd
parent 793 268bf4ca5fa1
child 835 182036ed6475
equal deleted inserted replaced
833:27f246b35ac2 834:783ef40344dd
  1528   return NULL;
  1528   return NULL;
  1529 }
  1529 }
  1530 
  1530 
  1531 
  1531 
  1532 void *visit(S_operator_c *symbol) {
  1532 void *visit(S_operator_c *symbol) {
       
  1533   /* This operator must implement one of two possible semantics: 
       
  1534    *     - FB call
       
  1535    *     - Set all the bits of an ANY_BIT type variable to 1
       
  1536    */
       
  1537   
       
  1538   /* Check whether we must implement the FB call semantics... */
       
  1539   if (NULL != symbol->called_fb_declaration)
       
  1540     return XXX_CAL_operator( "S", this->current_operand);
       
  1541   
       
  1542   /* Implement the bit setting semantics... */
  1533   if (wanted_variablegeneration != expression_vg) {
  1543   if (wanted_variablegeneration != expression_vg) {
  1534     s4o.print("LD");
  1544     s4o.print("LD");
  1535     return NULL;
  1545     return NULL;
  1536   }
  1546   }
  1537 
  1547 
  1550   return NULL;
  1560   return NULL;
  1551 }
  1561 }
  1552 
  1562 
  1553 
  1563 
  1554 void *visit(R_operator_c *symbol) {
  1564 void *visit(R_operator_c *symbol) {
       
  1565   /* This operator must implement one of two possible semantics: 
       
  1566    *     - FB call
       
  1567    *     - Set all the bits of an ANY_BIT type variable to 0
       
  1568    */
       
  1569   
       
  1570   /* Check whether we must implement the FB call semantics... */
       
  1571   if (NULL != symbol->called_fb_declaration)
       
  1572     return XXX_CAL_operator( "R", this->current_operand);
       
  1573   
       
  1574   /* Implement the bit setting semantics... */
  1555   if (wanted_variablegeneration != expression_vg) {
  1575   if (wanted_variablegeneration != expression_vg) {
  1556     s4o.print("LD");
  1576     s4o.print("LD");
  1557     return NULL;
  1577     return NULL;
  1558   }
  1578   }
  1559 
  1579