diff --git a/src/core/Int.pm b/src/core/Int.pm index 4c600ff3046..c20d229c39c 100644 --- a/src/core/Int.pm +++ b/src/core/Int.pm @@ -55,6 +55,10 @@ multi sub infix:«>=»(Int $a, Int $b) { pir::isge__III( $a, $b) ?? True !! False } +multi sub infix:«cmp»(Int $a, Int $b) { + pir::cmp__III($a, $b); +} + # Should pull along the other Int comparison operators at some point, # but this is a great start.