Author: leo
Date: Wed Jul 27 09:22:16 2005
New Revision: 8705

Modified:
   branches/leo-ctx5/classes/sub.pmc
   branches/leo-ctx5/languages/LANGUAGES.STATUS
Log:
merge -r8702:8704 from trunk

Modified: branches/leo-ctx5/classes/sub.pmc
==============================================================================
--- branches/leo-ctx5/classes/sub.pmc   (original)
+++ branches/leo-ctx5/classes/sub.pmc   Wed Jul 27 09:22:16 2005
@@ -138,6 +138,10 @@ Destroys the subroutine.
 
 Returns the name of the subroutine.
 
+=item C<void set_string_native(STRING *subname)>
+
+Sets the name of the subroutine.
+
 =cut
 
 */
@@ -146,6 +150,11 @@ Returns the name of the subroutine.
         return Parrot_full_sub_name(INTERP, SELF);
     }
 
+    void set_string_native(STRING *subname) {
+        struct Parrot_sub * sub = PMC_sub(SELF);
+        sub->name = string_copy(INTERP, subname);
+    }
+
 /*
 
 =item C<void set_pointer(void *value)>

Modified: branches/leo-ctx5/languages/LANGUAGES.STATUS
==============================================================================
--- branches/leo-ctx5/languages/LANGUAGES.STATUS        (original)
+++ branches/leo-ctx5/languages/LANGUAGES.STATUS        Wed Jul 27 09:22:16 2005
@@ -137,6 +137,14 @@ A: Alan Knowles
 D: An experimental implementation of PHP
 W: http://devel.akbkhome.com/svn/index.php/PintCompiler/
 
+N: Pugs
+A: Autrijus Tang
+D: Perl6 compiler written in Perl6 and Haskell with multiple backends
+S: Basic IO and control flow elements; mutable variables; assignment.
+M: Yes
+V: 0.2.2
+W: http://pugscode.org/
+
 N: Punie
 A: Allison Randal
 D: An implementation of Perl1, implemented in PIR with PGE

Reply via email to