25int f_pow(
int argc,
const int *argt,
void **args)
34 if (argt[1] != argt[0] || argt[2] != argt[0])
44 if (IS_NULL_C(&arg1[i]) || IS_NULL_C(&arg2[i]) || arg2[i] < 0)
47 res[i] = ipow(arg1[i], arg2[i]);
53 FCELL *arg1 = args[1];
54 FCELL *arg2 = args[2];
57 if (IS_NULL_F(&arg1[i]) || IS_NULL_F(&arg2[i]))
59 else if (arg1[i] < 0 && arg2[i] != ceil(arg2[i]))
63 res[i] = pow(arg1[i], arg2[i]);
72 DCELL *arg1 = args[1];
73 DCELL *arg2 = args[2];
76 if (IS_NULL_D(&arg1[i]) || IS_NULL_D(&arg2[i]))
78 else if (arg1[i] < 0 && arg2[i] != ceil(arg2[i]))
82 res[i] = pow(arg1[i], arg2[i]);