# New Ticket Created by Leopold Toetsch
# Please include the string: [perl #15885]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt2/Ticket/Display.html?id=15885 >
Hi,
attached Patch fixes a small problem with string_2.pasm.
assemple.pl:_annotate_contents() hangs on removing the trailing comment.
Propably the RE is too complex for 5.005_03.
leo
-- attachment 1 ------------------------------------------------------
url: http://rt.perl.org/rt2/attach/32436/26776/63f47e/t_op_string.t.diff
--- ../parrot/t/op/string.t Sat Jul 27 23:21:01 2002
+++ t/op/string.t Wed Jul 31 08:52:21 2002
@@ -22,7 +22,8 @@
clone S1, "Bar\n"
print S1
- chopn S1, 1 # Check that the contents of S1 are no longer constant
+ # Check that the contents of S1 are no longer constant
+ chopn S1, 1
print S1
print "\n"
