shithub: scc

Info  •  Files  •  Log  •  Branches

Remove printing in external environment

It is better to do this job in functions because it allows us
to can declare local variables and avoid conflict about names.

--- a/cc1/decl.c

+++ b/cc1/decl.c

@@ -544,11 +544,6 @@

 	case ';':

 		expect(';');

 		return;

-	case '@':

-		next();

-		emitprint(expr());

-		expect(';');

-		return;

 	default:

 		unexpected();

 	}

--- a/cc1/stmt.c

+++ b/cc1/stmt.c

@@ -338,6 +338,11 @@

 	case TYPEIDEN: case IDEN:

 		fun = (ahead() == ':') ? Label : stmtexp;

 		break;

+	case '@':

+		next();

+		emitprint(expr());

+		break;

+		next();

 	}

 	(*fun)(lbreak, lcont, lswitch);

 }