From 4e4d5373328276ea6d49a60242555d5db03158ff Mon Sep 17 00:00:00 2001 From: Bad Diode Date: Sun, 10 Oct 2021 14:48:30 +0200 Subject: Add numerical comparison primitive procedures --- tests/booleans_expected.txt | 12 ++++++++++++ 1 file changed, 12 insertions(+) (limited to 'tests/booleans_expected.txt') diff --git a/tests/booleans_expected.txt b/tests/booleans_expected.txt index f0612b8..5919767 100644 --- a/tests/booleans_expected.txt +++ b/tests/booleans_expected.txt @@ -46,3 +46,15 @@ (cond ((and true true false) 1) ((or false false false) 2) (else 3)) -> 3 (cond ((and true true true) 1) ((or true true false) 2)) -> () (cond ((and true true true) (+ 1 2 3)) ((or true true false) 2) (else 3)) -> 6 +(< 1 2 3) -> true +(< 3 2 1) -> false +(> 1 2 3) -> false +(> 3 2 1) -> true +(= 1 2 3) -> false +(= 3 2 1) -> false +(= 3 3 3) -> true +(= (+ 1 2) 3 (- 6 3)) -> true +(< 1 1 3) -> false +(<= 1 1 3) -> true +(> 3 3 1) -> false +(>= 3 3 1) -> true -- cgit v1.2.1