cvsuser 04/12/02 02:47:58
Modified: build_tools build_nativecall.pl
lib/Parrot Pmc2c.pm
src call_list.txt
Log:
fix method signatures
Revision Changes Path
1.60 +3 -2 parrot/build_tools/build_nativecall.pl
Index: build_nativecall.pl
===================================================================
RCS file: /cvs/public/parrot/build_tools/build_nativecall.pl,v
retrieving revision 1.59
retrieving revision 1.60
diff -u -r1.59 -r1.60
--- build_nativecall.pl 14 Oct 2004 15:09:45 -0000 1.59
+++ build_nativecall.pl 2 Dec 2004 10:47:55 -0000 1.60
@@ -1,6 +1,6 @@
#! perl -w
# Copyright: 2001-2003 The Perl Foundation. All Rights Reserved.
-# $Id: build_nativecall.pl,v 1.59 2004/10/14 15:09:45 leo Exp $
+# $Id: build_nativecall.pl,v 1.60 2004/12/02 10:47:55 leo Exp $
=head1 NAME
@@ -83,6 +83,7 @@
v => "void",
I => "Interp *",
P => "PMC *",
+ S => "STRING *",
O => "PMC *",
b => "void *",
B => "void **",
@@ -165,7 +166,7 @@
/* nci.c
* Copyright: 2001-2003 The Perl Foundation. All Rights Reserved.
* CVS Info
- * $Id: build_nativecall.pl,v 1.59 2004/10/14 15:09:45 leo Exp $
+ * $Id: build_nativecall.pl,v 1.60 2004/12/02 10:47:55 leo Exp $
* Overview:
* Native Call Interface routines. The code needed to build a
* parrot to C call frame is in here
1.60 +3 -3 parrot/lib/Parrot/Pmc2c.pm
Index: Pmc2c.pm
===================================================================
RCS file: /cvs/public/parrot/lib/Parrot/Pmc2c.pm,v
retrieving revision 1.59
retrieving revision 1.60
diff -u -r1.59 -r1.60
--- Pmc2c.pm 24 Nov 2004 16:17:22 -0000 1.59
+++ Pmc2c.pm 2 Dec 2004 10:47:57 -0000 1.60
@@ -1,5 +1,5 @@
# Copyright: 2004 The Perl Foundation. All Rights Reserved.
-# $Id: Pmc2c.pm,v 1.59 2004/11/24 16:17:22 leo Exp $
+# $Id: Pmc2c.pm,v 1.60 2004/12/02 10:47:57 leo Exp $
=head1 NAME
@@ -441,11 +441,11 @@
"char" => "c",
"short" => "s",
"int" => "i",
- "INTVAL" => "i",
+ "INTVAL" => "l",
"float" => "f",
"FLOATVAL" => "d",
"double" => "d",
- "STRING*" => "t",
+ "STRING*" => "S",
"char*" => "t",
"PMC*" => "P",
"short*" => "2",
1.49 +1 -0 parrot/src/call_list.txt
Index: call_list.txt
===================================================================
RCS file: /cvs/public/parrot/src/call_list.txt,v
retrieving revision 1.48
retrieving revision 1.49
diff -u -r1.48 -r1.49
--- call_list.txt 24 Nov 2004 16:17:26 -0000 1.48
+++ call_list.txt 2 Dec 2004 10:47:58 -0000 1.49
@@ -253,3 +253,4 @@
# Parrot builtins
d IOd
+P IOl