stage4/generate_c/generate_c_vardecl.cc
changeset 230 816846a8d66b
parent 226 29f8ffc203c1
child 235 ed66dc50f31a
equal deleted inserted replaced
229:ca7bc1324540 230:816846a8d66b
  1659       s4o.print("(");
  1659       s4o.print("(");
  1660       this->current_var_type_symbol->accept(*this);
  1660       this->current_var_type_symbol->accept(*this);
  1661       s4o.print(",");
  1661       s4o.print(",");
  1662       symbol->location->accept(*this);
  1662       symbol->location->accept(*this);
  1663       s4o.print(",");
  1663       s4o.print(",");
       
  1664       print_variable_prefix();
  1664       if (symbol->variable_name != NULL)
  1665       if (symbol->variable_name != NULL)
  1665         symbol->variable_name->accept(*this);
  1666         symbol->variable_name->accept(*this);
  1666       else
  1667       else
  1667         symbol->location->accept(*this);
  1668         symbol->location->accept(*this);
  1668       s4o.print(",");
       
  1669       print_variable_prefix();
       
  1670       print_retain();
  1669       print_retain();
  1671       s4o.print(")\n");
  1670       s4o.print(")\n");
  1672       if (this->current_var_init_symbol != NULL) {
  1671       if (this->current_var_init_symbol != NULL) {
       
  1672     	s4o.print(s4o.indent_spaces);
  1673     	s4o.print(INIT_LOCATED_VALUE);
  1673     	s4o.print(INIT_LOCATED_VALUE);
  1674     	s4o.print("(");
  1674     	s4o.print("(");
       
  1675     	print_variable_prefix();
  1675     	if (symbol->variable_name != NULL)
  1676     	if (symbol->variable_name != NULL)
  1676           symbol->variable_name->accept(*this);
  1677           symbol->variable_name->accept(*this);
  1677         else
  1678         else
  1678           symbol->location->accept(*this);
  1679           symbol->location->accept(*this);
  1679     	s4o.print(",");
  1680     	s4o.print(",");
  1680         this->current_var_init_symbol->accept(*this);
  1681         this->current_var_init_symbol->accept(*this);
  1681         s4o.print(")\n");
  1682         s4o.print(")");
  1682       }
  1683       }
  1683       break;
  1684       break;
  1684 
  1685 
  1685     case globalinit_vf:
  1686     case globalinit_vf:
  1686       s4o.print(s4o.indent_spaces + "__plc_pt_c<");
  1687       s4o.print(s4o.indent_spaces + "__plc_pt_c<");