From 8131ddc22af5d39114a55349d71bcdc467599187 Mon Sep 17 00:00:00 2001
From: bd-912 <bdunahu@colostate.edu>
Date: Wed, 27 Mar 2024 13:09:08 -0600
Subject: Expand file structure, Vaporize skeleton

---
 vaporize/tests/Factorial.opt.vapor | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100644 vaporize/tests/Factorial.opt.vapor

(limited to 'vaporize/tests/Factorial.opt.vapor')

diff --git a/vaporize/tests/Factorial.opt.vapor b/vaporize/tests/Factorial.opt.vapor
new file mode 100644
index 0000000..aca17fe
--- /dev/null
+++ b/vaporize/tests/Factorial.opt.vapor
@@ -0,0 +1,20 @@
+
+const empty_Fac
+
+
+func Main()
+  t.0 = call :Fac.ComputeFac(:empty_Fac 10)
+  PrintIntS(t.0)
+  ret
+
+func Fac.ComputeFac(this num)
+  t.0 = LtS(num 1)
+  if0 t.0 goto :if1_else
+    num_aux = 1
+    goto :if1_end
+  if1_else:
+    t.1 = Sub(num 1)
+    t.2 = call :Fac.ComputeFac(this t.1)
+    num_aux = MulS(num t.2)
+  if1_end:
+  ret num_aux
-- 
cgit v1.2.3