From 000b28c88bbfd1fde94b5e01ce2766230077e013 Mon Sep 17 00:00:00 2001 From: bd Date: Sun, 12 Jan 2025 15:10:23 -0700 Subject: Expansion of complex expressions into set of instructions --- src/unit-tests/utils/t-factory.test.scm | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) create mode 100644 src/unit-tests/utils/t-factory.test.scm (limited to 'src/unit-tests/utils') diff --git a/src/unit-tests/utils/t-factory.test.scm b/src/unit-tests/utils/t-factory.test.scm new file mode 100644 index 0000000..eda983b --- /dev/null +++ b/src/unit-tests/utils/t-factory.test.scm @@ -0,0 +1,19 @@ +;; -*- compile-command: "guile -L ./src ./src/unit-tests/utils/t-factory.test.scm"; -*- +(use-modules (srfi srfi-64) + (modules ast assembly-tree) + (modules utils t-factory)) + + +(test-begin "t-factory-harness") + + +(test-equal "make first temporary" + 't.101 + (temporary-name (make-t))) + +(test-equal "make second temporary" + 't.102 + (temporary-name (make-t))) + + +(test-end "t-factory-harness") -- cgit v1.2.3