From 8e633a6c6f9ed28a24afb4c0ed7219d034850fd4 Mon Sep 17 00:00:00 2001 From: Michael Williamson Date: Sun, 23 Jul 2023 11:12:35 +0100 Subject: Add int-eq instruction to Patio --- .../org/shedlang/compiler/patio/PatioSerializerTests.java | 15 +++++++++++++++ .../org/shedlang/compiler/patio/instructions/Patio.java | 8 ++++++++ 2 files changed, 23 insertions(+) (limited to 'src/test/java') diff --git a/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java b/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java index c1480dd9..57b7948d 100644 --- a/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java +++ b/src/test/java/org/shedlang/compiler/patio/PatioSerializerTests.java @@ -233,6 +233,21 @@ public class PatioSerializerTests { )); } + @Test + public void canSerializeIntEquals() { + var instruction = Patio.intEquals( + Patio.localRef("target"), + Patio.localRef("left"), + Patio.localRef("right") + ); + + var string = PatioTesting.serializeInstruction(instruction); + + assertThat(string, equalTo(""" + (int-eq (local "target") (local "left") (local "right"))""" + )); + } + @Test public void canSerializeIntToDataPtr() { var instruction = Patio.intToDataPtr("target", "value"); diff --git a/src/test/java/org/shedlang/compiler/patio/instructions/Patio.java b/src/test/java/org/shedlang/compiler/patio/instructions/Patio.java index 5d788a89..2bdca7a4 100644 --- a/src/test/java/org/shedlang/compiler/patio/instructions/Patio.java +++ b/src/test/java/org/shedlang/compiler/patio/instructions/Patio.java @@ -112,6 +112,14 @@ public class Patio { ); } + public static PatioInstruction intEquals( + PatioLocalRef target, + PatioOperand left, + PatioOperand right + ) { + return new PatioIntEquals(target, left, right, Sources.NULL); + } + public static PatioInstruction intToDataPtr(String target, String value) { return new PatioIntToDataPtr( new PatioLocalRef(target), -- cgit v1.2.3