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

[svn:parrot] r33549 - trunk/src/pmc

From:
julianalbo
Date:
December 6, 2008 04:39
Subject:
[svn:parrot] r33549 - trunk/src/pmc
Message ID:
20081206123923.20334CB9AF@x12.develooper.com
Author: julianalbo
Date: Sat Dec  6 04:39:17 2008
New Revision: 33549

Modified:
   trunk/src/pmc/exception.pmc

Log:
fix exception.pmc:get_bool

Modified: trunk/src/pmc/exception.pmc
==============================================================================
--- trunk/src/pmc/exception.pmc	(original)
+++ trunk/src/pmc/exception.pmc	Sat Dec  6 04:39:17 2008
@@ -176,7 +176,7 @@
 
 /*
 
-=item C<STRING *get_bool()>
+=item C<INTVAL get_bool()>
 
 Return true.
 
@@ -184,8 +184,8 @@
 
 */
 
-    VTABLE INTVAL *get_bool() {
-        return (INTVAL)1;
+    VTABLE INTVAL get_bool() {
+        return 1;
     }
 
 /*



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