diff --git a/module/system/il/macros.scm b/module/system/il/macros.scm index dfd063ba5..97030cf14 100644 --- a/module/system/il/macros.scm +++ b/module/system/il/macros.scm @@ -80,10 +80,10 @@ (define (@inexact? x) `((@ Core::inexact?) ,x)) (define (@= x y) `(@@ ee? ,x ,y)) -(define (@< x y) `(@@ lt? ,x ,y)) -(define (@> x y) `(@@ gt? ,x ,y)) -(define (@<= x y) `(@@ le? ,x ,y)) -(define (@>= x y) `(@@ ge? ,x ,y)) +;(define (@< x y) `(@@ lt? ,x ,y)) +;(define (@> x y) `(@@ gt? ,x ,y)) +;(define (@<= x y) `(@@ le? ,x ,y)) +;(define (@>= x y) `(@@ ge? ,x ,y)) (define @+ (match-lambda*