develooper Front page | perl.cvs.parrot | Postings from December 2008

[svn:parrot] r34620 - branches/pdd22io_part3/src/pmc

From:
allison
Date:
December 29, 2008 23:08
Subject:
[svn:parrot] r34620 - branches/pdd22io_part3/src/pmc
Message ID:
20081230070842.09462CB9FA@x12.develooper.com
Author: allison
Date: Mon Dec 29 23:08:41 2008
New Revision: 34620

Modified:
   branches/pdd22io_part3/src/pmc/stringhandle.pmc

Log:
[pdd22io] Change compile-time strings to actual string constants.


Modified: branches/pdd22io_part3/src/pmc/stringhandle.pmc
==============================================================================
--- branches/pdd22io_part3/src/pmc/stringhandle.pmc	(original)
+++ branches/pdd22io_part3/src/pmc/stringhandle.pmc	Mon Dec 29 23:08:41 2008
@@ -427,9 +427,9 @@
 
     METHOD buffer_type(STRING *new_type :optional, INTVAL got_type :opt_flag) {
         INTVAL flags;
-        STRING *nobuffer_string   = CONST_STRING(INTERP, "unbuffered");
-        STRING *linebuffer_string = CONST_STRING(INTERP, "line-buffered");
-        STRING *fullbuffer_string = CONST_STRING(INTERP, "full-buffered");
+        STRING *nobuffer_string   = const_string(INTERP, "unbuffered");
+        STRING *linebuffer_string = const_string(INTERP, "line-buffered");
+        STRING *fullbuffer_string = const_string(INTERP, "full-buffered");
 
         GET_ATTR_flags(INTERP, SELF, flags);
 



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About