From 187b186112f88b883a6366f7cd1b4a1ef32d3232 Mon Sep 17 00:00:00 2001
From: Ginger Bill <bill@gingerbill.org>
Date: Sun, 16 Apr 2017 22:30:48 +0100
Subject: Add `#require_results` for procedures

---
 src/parser.c | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'src/parser.c')

diff --git a/src/parser.c b/src/parser.c
index c3005ddb7..31d14db78 100644
--- a/src/parser.c
+++ b/src/parser.c
@@ -65,6 +65,8 @@ typedef enum ProcTag {
 	ProcTag_bounds_check    = 1<<0,
 	ProcTag_no_bounds_check = 1<<1,
 
+	ProcTag_require_results = 1<<4,
+
 	ProcTag_foreign         = 1<<10,
 	ProcTag_export          = 1<<11,
 	ProcTag_link_name       = 1<<12,
@@ -1570,6 +1572,7 @@ void parse_proc_tags(AstFile *f, u64 *tags, AstNode **foreign_library_token, Str
 				expect_token(f, Token_String);
 			}
 		}
+		ELSE_IF_ADD_TAG(require_results)
 		ELSE_IF_ADD_TAG(export)
 		ELSE_IF_ADD_TAG(bounds_check)
 		ELSE_IF_ADD_TAG(no_bounds_check)
-- 
cgit v1.2.3