Skip divisions by zero

eval.y

@@ -35,7 +35,7 @@ EXPR	: EXPR '+' FACTOR	{$$ = $1 + $3;}
 	;
 
 FACTOR	: FACTOR '*' ATOM	{$$ = $1 * $3;}
-	| FACTOR '/' ATOM	{$$ = $1 / $3;}
+	| FACTOR '/' ATOM	{if ($3 == 0) $$ = $1; else $$ = $1 / $3;}
         | ATOM
 	;