Function AR_MODULO

src/arithmetic/numeric_funcs/numeric_funcs.c:51–60

}

SIValue AR_MODULO(SIValue *argv, int argc, void *private_data) {
	if(SIValue_IsNull(argv[0]) || SIValue_IsNull(argv[1])) return SI_NullVal();

	// check for modulo by zero e.g. n % 0
	if((SI_TYPE(argv[0]) & SI_TYPE(argv[1]) & T_INT64) && SI_GET_NUMERIC(argv[1]) == 0) {
		Error_DivisionByZero();
		return SI_NullVal();
	}
	return SIValue_Modulo(argv[0], argv[1]);
}

/* TODO All AR_* functions need to emit appropriate failures when provided
 * with arguments of invalid types and handle multiple arguments. */