summaryrefslogtreecommitdiff
path: root/src/pa
diff options
context:
space:
mode:
authorAnthony Green <green@gmachine.(none)>2009-12-24 00:22:00 -0500
committerAnthony Green <green@gmachine.(none)>2009-12-24 00:22:00 -0500
commit115ab36fceee69740a01ce49bc27e1908cc237b1 (patch)
treedf2028286cbb876ce100438411cb7cdb4a9527c7 /src/pa
parentf8c7a245bf5a80bd7e730ec03fcad17c8dcfcb07 (diff)
downloadlibffi-115ab36fceee69740a01ce49bc27e1908cc237b1.tar.gz
Update missing changes for 3.0.9r4.
Diffstat (limited to 'src/pa')
-rw-r--r--src/pa/.svn/entries30
-rw-r--r--src/pa/.svn/text-base/ffi.c.svn-base7
-rw-r--r--src/pa/ffi.c7
3 files changed, 29 insertions, 15 deletions
diff --git a/src/pa/.svn/entries b/src/pa/.svn/entries
index 4f476e4..e905aff 100644
--- a/src/pa/.svn/entries
+++ b/src/pa/.svn/entries
@@ -1,15 +1,15 @@
10
dir
-152280
-svn://gcc.gnu.org/svn/gcc/trunk/libffi/src/pa
-svn://gcc.gnu.org/svn/gcc
+155449
+svn+ssh://green@gcc.gnu.org/svn/gcc/trunk/libffi/src/pa
+svn+ssh://green@gcc.gnu.org/svn/gcc
-2009-06-04T15:43:03.499507Z
-148172
-aph
+2009-12-14T02:42:18.232982Z
+155205
+danglin
@@ -32,7 +32,7 @@ file
-2009-06-10T05:25:02.000000Z
+2009-12-20T06:01:55.320573Z
a0da8c57c7ff9de674c6728fe321f0be
2009-06-04T15:43:03.499507Z
148172
@@ -66,7 +66,7 @@ file
-2009-06-10T05:25:02.000000Z
+2009-12-20T06:01:55.320573Z
3a6fbb541af62fcd2ae81d874b0c4487
2009-06-04T15:11:12.475454Z
148171
@@ -100,11 +100,11 @@ file
-2009-06-10T05:25:02.000000Z
-7584ecb991cb652c6935e9f0069dfda3
-2009-06-04T15:43:03.499507Z
-148172
-aph
+2009-12-20T06:01:55.321563Z
+46d11fefb8b36884e8d934a99ab5fb0b
+2009-12-14T02:42:18.232982Z
+155205
+danglin
@@ -126,7 +126,7 @@ aph
-19820
+19978
hpux32.S
file
@@ -134,7 +134,7 @@ file
-2009-06-10T05:25:02.000000Z
+2009-12-20T06:01:55.321563Z
f3279dc3ee2648b08c274f2457d17660
2009-06-04T15:43:03.499507Z
148172
diff --git a/src/pa/.svn/text-base/ffi.c.svn-base b/src/pa/.svn/text-base/ffi.c.svn-base
index c7a1435..6d7606f 100644
--- a/src/pa/.svn/text-base/ffi.c.svn-base
+++ b/src/pa/.svn/text-base/ffi.c.svn-base
@@ -492,6 +492,13 @@ ffi_status ffi_closure_inner_pa32(ffi_closure *closure, UINT32 *stack)
avalue[i] = (void *)(stack - slot);
break;
+#ifdef PA_HPUX
+ case FFI_TYPE_LONGDOUBLE:
+ /* Long doubles are treated like a big structure. */
+ avalue[i] = (void *) *(stack - slot);
+ break;
+#endif
+
case FFI_TYPE_STRUCT:
/* Structs smaller or equal than 4 bytes are passed in one
register. Structs smaller or equal 8 bytes are passed in two
diff --git a/src/pa/ffi.c b/src/pa/ffi.c
index c7a1435..6d7606f 100644
--- a/src/pa/ffi.c
+++ b/src/pa/ffi.c
@@ -492,6 +492,13 @@ ffi_status ffi_closure_inner_pa32(ffi_closure *closure, UINT32 *stack)
avalue[i] = (void *)(stack - slot);
break;
+#ifdef PA_HPUX
+ case FFI_TYPE_LONGDOUBLE:
+ /* Long doubles are treated like a big structure. */
+ avalue[i] = (void *) *(stack - slot);
+ break;
+#endif
+
case FFI_TYPE_STRUCT:
/* Structs smaller or equal than 4 bytes are passed in one
register. Structs smaller or equal 8 bytes are passed in two