[svn:parrot] r35290 - trunk/languages/befunge

Author: jquelin
Date: Fri Jan  9 04:01:03 2009
New Revision: 35290

Modified:
   trunk/languages/befunge/maths.pir

Log:
handling division by zero


Modified: trunk/languages/befunge/maths.pir
==============================================================================
--- trunk/languages/befunge/maths.pir	(original)
+++ trunk/languages/befunge/maths.pir	Fri Jan  9 04:01:03 2009
@@ -46,8 +46,13 @@
 .sub "maths__div"
     $I1 = stack__pop()
     $I0 = stack__pop()
+    if $I1 == 0 goto MATHS__DIV__BY_ZERO
     $I2 = $I0 / $I1
     stack__push($I2)
+    .return()
+    
+  MATHS__DIV__BY_ZERO:
+    stack__push(0)
 .end
 
 

• [svn:parrot] r35290 - trunk/languages/befunge by jquelin