Попробуйте это (возможно, переместите функции и переменные, связанные с закрытием , в их собственный файл):
#include <stdio.h>
typedef int (*f_ptr)(int a, int b);
typedef int (*pair_ptr)(f_ptr);
static int PairA, PairB;
static void setPairA(int a) { PairA = a; }
static void setPairB(int b) { PairB = b; }
int f(int a, int b) {
(void)b; // removed unused parameter warning
return a;
}
int pair(f_ptr fp) {
return fp(PairA, PairB);
}
pair_ptr cons(int a, int b) {
setPairA(a);
setPairB(b);
return pair;
}
int car(pair_ptr fun) {
return fun(f);
}
int main(void) {
int a = 3;
int b = 4;
printf("%d\n", car(cons(a, b)));
return 0;
}
Обратите внимание, что pair()
не является реентерабельным, и вы не можете его называть с разными значениями для PairA
и / или PairB
одновременно.