freepascal.compiler/tests/test/cg/obj/tcext4.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;
}