From ccf5a1b97272a7d656417ff2fd49dcaab2a0f848 Mon Sep 17 00:00:00 2001 From: "Markus F.X.J. Oberhumer" Date: Tue, 13 Feb 2007 09:48:37 +0100 Subject: [PATCH] Add some more funcs to cc_test.c. --- src/stub/src/arch/i086/cc_test.c | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/src/stub/src/arch/i086/cc_test.c b/src/stub/src/arch/i086/cc_test.c index 7ef76808..b60d3fea 100644 --- a/src/stub/src/arch/i086/cc_test.c +++ b/src/stub/src/arch/i086/cc_test.c @@ -77,9 +77,11 @@ int __cdecl ptc_ge(hptr a, hptr b) { return a >= b; } // u4m - unsigned multiplication uint32_t __cdecl u4m(uint32_t a, uint32_t b) { return a * b; } +uint32_t __pascal u4m_p(uint32_t a, uint32_t b) { return b * a; } // i4m - signed multiplication int32_t __cdecl i4m(int32_t a, int32_t b) { return a * b; } +int32_t __pascal i4m_p(int32_t a, int32_t b) { return b * a; } // just for testing uint16_t __cdecl u2m(uint16_t a, uint16_t b) { return a * b; } @@ -96,6 +98,11 @@ uint32_t __cdecl u4shl24(uint32_t a) { return a << 24; } uint16_t __cdecl u2shlv(uint16_t a, unsigned v) { return a << v; } uint32_t __cdecl u4shlv(uint32_t a, unsigned v) { return a << v; } +void __pascal p4nshlv_v(unsigned char v, uint32_t __near *a) { *a <<= v; } +void __pascal p4fshlv_v(unsigned char v, uint32_t __far *a) { *a <<= v; } +uint32_t __pascal p4nshlv(unsigned char v, uint32_t __near *a) { return *a <<= v; } +uint32_t __pascal p4fshlv(unsigned char v, uint32_t __far *a) { return *a <<= v; } + hptrdiff_t __cdecl hptr2int(hptr a) { return (hptrdiff_t) a; } hptr __cdecl int2hptr(hptrdiff_t a) { return (hptr) a; }