From 5bd78ff5d0e04281cade5ad3e2256c0e9505938f Mon Sep 17 00:00:00 2001 From: henriquelalves Date: Fri, 23 May 2025 13:32:29 +0300 Subject: update to latest jam changes --- scripts/utils.scm | 8 -------- 1 file changed, 8 deletions(-) delete mode 100644 scripts/utils.scm (limited to 'scripts/utils.scm') diff --git a/scripts/utils.scm b/scripts/utils.scm deleted file mode 100644 index 3348075..0000000 --- a/scripts/utils.scm +++ /dev/null @@ -1,8 +0,0 @@ -(define (is-point-inside-rect? point rect) - (cond ((not (point? point)) #f) - ((not (rect? rect)) #f) - (else (and (>= (point-x point) (rect-x rect)) - (>= (point-y point) (rect-y rect)) - (<= (point-x point) (+ (rect-x rect) (rect-width rect))) - (<= (point-y point) (+ (rect-y rect) (rect-height rect)))) - ))) -- cgit v1.2.3