commonMain.it.unibo.tuprolog.solve.stdlib.function.IntegerDivision.kt Maven / Gradle / Ivy
package it.unibo.tuprolog.solve.stdlib.function
import it.unibo.tuprolog.core.Integer
import it.unibo.tuprolog.core.Numeric
import it.unibo.tuprolog.solve.ExecutionContext
import it.unibo.tuprolog.solve.function.IntegersBinaryMathFunction
import org.gciatto.kt.math.BigInteger
/**
* Implementation of `'//'/2` arithmetic functor
*
* @author Enrico
*/
object IntegerDivision : IntegersBinaryMathFunction("//") {
override fun mathFunction(
integer1: Integer,
integer2: Integer,
context: ExecutionContext,
): Numeric =
// TODO: 25/10/2019 "int_overflow" checks missing (see the standard)
if (integer2.value.compareTo(BigInteger.ZERO) == 0) {
throwZeroDivisorError(context)
} else {
Numeric.of(integer1.value / integer2.value)
}
}
© 2015 - 2025 Weber Informatics LLC | Privacy Policy