Function codegen_statement

blakcomp/codegen.c:584–672

/ * codegen_statement: Generate code for a single statement. * numlocals should be # of local variables for message excluding temps. * Returns highest # local variable used in code for statement. */

 *   Returns highest # local variable used in code for statement.
 */
int codegen_statement(stmt_type s, int numlocals)
{
   opcode_type opcode;
   int our_maxtemp = numlocals; /* highest numbered temporary required for this statement alone */

   /* Save line # debugging information */
   if (debug_bof && s->lineno != 0)
   {
      DebugLine *d = (DebugLine *) SafeMalloc(sizeof(DebugLine));
      d->lineno = s->lineno;
      d->offset = FileCurPos(outfile);
      debug_lines = list_add_item(debug_lines, d);
   }
   
   memset(&opcode, 0, sizeof(opcode));  /* Set opcode to all zeros */
   switch (s->type)
   {
   case S_ASSIGN:
   {
      assign_stmt_type stmt = s->value.assign_stmt_val;

      /* Place result directly in lhs */
      our_maxtemp = flatten_expr(stmt->rhs, stmt->lhs, numlocals);
      break;
   }

   case S_CALL:
      our_maxtemp = codegen_call(s->value.call_stmt_val, NULL, numlocals);
      break;

   case S_PROP:
      opcode.command = RETURN;
      opcode.dest = PROPAGATE;
      OutputOpcode(outfile, opcode);
      break;

   case S_RETURN:
      our_maxtemp = codegen_return(s->value.return_stmt_val, numlocals);
      break;

   case S_IF:
      our_maxtemp = codegen_if(s->value.if_stmt_val, numlocals);
      break;

   case S_FOR:
      our_maxtemp = codegen_for(s->value.for_stmt_val, numlocals);
      break;

   case S_WHILE:
      our_maxtemp = codegen_while(s->value.while_stmt_val, numlocals);
      break;

   case S_BREAK:
      /* Goto end of loop */
      opcode.command = GOTO;
      opcode.source1 = 0;
      opcode.source2 = GOTO_UNCONDITIONAL;
      OutputOpcode(outfile, opcode);