Author: jquelin
Date: Fri Jan 9 04:37:52 2009
New Revision: 35296
Modified:
trunk/languages/befunge/debug.pir
Log:
fix breakpoint adding
Modified: trunk/languages/befunge/debug.pir
==============================================================================
--- trunk/languages/befunge/debug.pir (original)
+++ trunk/languages/befunge/debug.pir Fri Jan 9 04:37:52 2009
@@ -204,9 +204,9 @@
goto DEBUG__INTERACT__LOOP
DEBUG__INTERACT__BREAK:
- $S1 = substr $S0, 6, -1
+ substr $S0, 0, 6, ""
$P0 = get_global "breakpoints"
- $P0[$S1] = 1
+ $P0[$S0] = 1
set_global "breakpoints", $P0
goto DEBUG__INTERACT__LOOP
