From 9edace28e2e43fb8cb8dc64191b3ed3f5a185f99 Mon Sep 17 00:00:00 2001 From: Bruce Hill Date: Tue, 13 Aug 2024 03:20:01 -0400 Subject: Fix ranges --- builtins/integers.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'builtins/integers.c') diff --git a/builtins/integers.c b/builtins/integers.c index b50d61c2..aa1ab4ae 100644 --- a/builtins/integers.c +++ b/builtins/integers.c @@ -360,7 +360,7 @@ public Int_t Int$random(Int_t min, Int_t max) { } public Range_t Int$to(Int_t from, Int_t to) { - return (Range_t){from, to, Int$compare(&to, &from, &$Int) >= 0 ? (Int_t){.small=(1<<2)|1} : (Int_t){.small=(-1/4)|1}}; + return (Range_t){from, to, Int$compare(&to, &from, &$Int) >= 0 ? (Int_t){.small=(1<<2)|1} : (Int_t){.small=(-1>>2)|1}}; } public Int_t Int$from_text(CORD text) { -- cgit v1.2.3