Author: particle
Date: Sat Oct 6 09:59:00 2007
New Revision: 21921
Modified:
branches/pdd15oo/t/op/calling.t
Log:
[t]: use heredoc to make code easier on the eyes
Modified: branches/pdd15oo/t/op/calling.t
==============================================================================
--- branches/pdd15oo/t/op/calling.t (original)
+++ branches/pdd15oo/t/op/calling.t Sat Oct 6 09:59:00 2007
@@ -1681,12 +1681,14 @@
.local string s
.local pmc cl, o
cl = newclass "Foo"
- s = ".namespace ['Foo']\n"
- s .= ".sub get_integer_keyed_int :vtable :method\n"
- s .= ".param int i\n"
- s .= "i += 5\n"
- s .= ".return(i)\n"
- s .= ".end\n"
+ s = <<"END_PIR"
+.namespace ['Foo']
+.sub get_integer_keyed_int :vtable :method
+ .param int i
+ i += 5
+ .return(i)
+.end
+END_PIR
.local pmc comp
comp = compreg "PIR"
$P0 = comp(s)
