fpc/tests/test/cg/obj/tcext4.c
tom_at_work f9722ad6a5 * new additional C parameter passing test programs
* finally added powerpc64/linux C object files to repository

git-svn-id: trunk@1982 -
2005-12-18 21:57:19 +00:00

118 lines
1.8 KiB
C

#include <stdint.h>
int64_t pass1(int8_t arr[1]) {
return arr[0];
}
int64_t pass2(int8_t arr[2]) {
int i; int64_t sum = 0;
for (i = 0; i < 2; i++) {
sum += arr[i];
}
return sum;
}
int64_t pass3(int8_t arr[3]) {
int i; int64_t sum = 0;
for (i = 0; i < 3; i++) {
sum += arr[i];
}
return sum;
}
int64_t pass4(int8_t arr[4]) {
int i; int64_t sum = 0;
for (i = 0; i < 4; i++) {
sum += arr[i];
}
return sum;
}
int64_t pass5(int8_t arr[5]) {
int i; int64_t sum = 0;
for (i = 0; i < 5; i++) {
sum += arr[i];
}
return sum;
}
int64_t pass7(int8_t arr[7]) {
int i; int64_t sum = 0;
for (i = 0; i < 7; i++) {
sum += arr[i];
}
return sum;
}
int64_t pass8(int8_t arr[8]) {
int i; int64_t sum = 0;
for (i = 0; i < 8; i++) {
sum += arr[i];
}
return sum;
}
int64_t pass9(int8_t arr[9]) {
int i; int64_t sum = 0;
for (i = 0; i < 9; i++) {
sum += arr[i];
}
return sum;
}
int64_t pass15(int8_t arr[15]) {
int i; int64_t sum = 0;
for (i = 0; i < 15; i++) {
sum += arr[i];
}
return sum;
}
int64_t pass16(int8_t arr[16]) {
int i; int64_t sum = 0;
for (i = 0; i < 16; i++) {
sum += arr[i];
}
return sum;
}
int64_t pass17(int8_t arr[17]) {
int i; int64_t sum = 0;
for (i = 0; i < 17; i++) {
sum += arr[i];
}
return sum;
}
int64_t pass24(int8_t arr[24]) {
int i; int64_t sum = 0;
for (i = 0; i < 24; i++) {
sum += arr[i];
}
return sum;
}
int64_t pass31(int8_t arr[31]) {
int i; int64_t sum = 0;
for (i = 0; i < 31; i++) {
sum += arr[i];
}
return sum;
}
int64_t pass32(int8_t arr[32]) {
int i; int64_t sum = 0;
for (i = 0; i < 32; i++) {
sum += arr[i];
}
return sum;
}
int64_t pass33(int8_t arr[33]) {
int i; int64_t sum = 0;
for (i = 0; i < 33; i++) {
sum += arr[i];
}
return sum;
}