From c1bb5eca952243e4ec4b8b0db218407a5a0260b3 Mon Sep 17 00:00:00 2001
From: "Kartik K. Agaram" <vc@akkartik.com>
Date: Tue, 20 Feb 2018 22:09:12 -0800
Subject: 4213

---
 076continuation.cc | 3 +++
 1 file changed, 3 insertions(+)

(limited to '076continuation.cc')

diff --git a/076continuation.cc b/076continuation.cc
index 38e0185b..54037b41 100644
--- a/076continuation.cc
+++ b/076continuation.cc
@@ -118,6 +118,9 @@ CALL_WITH_CONTINUATION_MARK,
 Recipe_ordinal["call-with-continuation-mark"] = CALL_WITH_CONTINUATION_MARK;
 :(before "End Primitive Recipe Checks")
 case CALL_WITH_CONTINUATION_MARK: {
+  if (SIZE(inst.ingredients) < 2) {
+    raise << maybe(get(Recipe, r).name) << "'" << to_original_string(inst) << "' requires at least two ingredients: a mark number and a recipe to call\n" << end();
+  }
   break;
 }
 :(before "End Primitive Recipe Implementations")
-- 
cgit 1.4.1-2-gfad0