From 0c982d2aa285e6c095470667c1d0c21999ddad58 Mon Sep 17 00:00:00 2001
From: Bruce Hill <bruce@bruce-hill.com>
Date: Fri, 28 Sep 2018 22:16:10 -0700
Subject: Oops, refactor bug.

---
 core/control_flow.nom | 1 +
 1 file changed, 1 insertion(+)

(limited to 'core')

diff --git a/core/control_flow.nom b/core/control_flow.nom
index 243df96..48b9c85 100644
--- a/core/control_flow.nom
+++ b/core/control_flow.nom
@@ -522,6 +522,7 @@ compile [do %action then always %final_action] to:
         ..    if not \(mangle "ok") then error(ret, 0) end
             if not \(mangle "fell_through") then return ret end
         end"
+    return %lua
 
 test:
     assume ((result of (: return 99)) == 99)
-- 
cgit v1.2.3