Author: jquelin
Date: Fri Jan 9 04:40:45 2009
New Revision: 35297
Modified:
trunk/languages/befunge/debug.pir
Log:
removing breakpoint implemented
Modified: trunk/languages/befunge/debug.pir
==============================================================================
--- trunk/languages/befunge/debug.pir (original)
+++ trunk/languages/befunge/debug.pir Fri Jan 9 04:40:45 2009
@@ -217,7 +217,10 @@
goto DEBUG__INTERACT__END
DEBUG__INTERACT__DELETE:
- _debug__breakpoint_del()
+ substr $S0, 0, 7, ""
+ $P0 = get_global "breakpoints"
+ delete $P0[$S0]
+ set_global "breakpoints", $P0
goto DEBUG__INTERACT__LOOP
DEBUG__INTERACT__DUMP:
@@ -250,15 +253,6 @@
_debug__print_status()
goto DEBUG__INTERACT__LOOP
-=pod
-
-DEBUG_INTERACT_DELETE:
- substr S11, S10, 0, 7, ""
- set P4, P3[1]
- delete P4[S10]
- branch DEBUG_INTERACT
-
-=cut
DEBUG__INTERACT__END:
.return()
