cvsuser 03/06/24 06:22:31
Modified: languages/BASIC/compiler RT_builtins.pasm
Log:
Removed debugging messages
Revision Changes Path
1.8 +0 -12 parrot/languages/BASIC/compiler/RT_builtins.pasm
Index: RT_builtins.pasm
===================================================================
RCS file: /cvs/public/parrot/languages/BASIC/compiler/RT_builtins.pasm,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -w -r1.7 -r1.8
--- RT_builtins.pasm 24 Jun 2003 01:54:14 -0000 1.7
+++ RT_builtins.pasm 24 Jun 2003 13:22:31 -0000 1.8
@@ -309,19 +309,7 @@
.param string substr
length $I0, substr
eq $I0, 0, ENDINSTR
- print "Index "
- print $I0
- print " full='"
- print full
- print "' substr='"
- print substr
- print "' start='"
- print start
- print "'\n"
index $I0, full, substr, start
- print "Result = "
- print $I0
- print "\n"
set $N0, $I0
ENDINSTR:inc $N0
