From 8bd7113e5b9c53eb29b7211d43f6d8bc2f58eb81 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Bj=C3=B6rn-Egil=20Dahlberg?= <egil@erlang.org>
Date: Tue, 28 Jan 2014 10:39:14 +0100
Subject: compiler: Fixup #map_pair{} spec

---
 lib/compiler/src/core_parse.hrl | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lib/compiler/src/core_parse.hrl b/lib/compiler/src/core_parse.hrl
index 067a1ae895..d54715ef59 100644
--- a/lib/compiler/src/core_parse.hrl
+++ b/lib/compiler/src/core_parse.hrl
@@ -98,8 +98,9 @@
 -record(c_var, {anno=[], name :: cerl:var_name()}).
 
 -record(c_map_pair, {anno=[],
-	             op :: 'assoc' | 'exact',
-		     key, val}).
+	             op :: #c_literal{val::'assoc'} | #c_literal{val::'exact'},
+		     key,
+		     val}).
 
 -record(c_map, {anno=[],
 		var=#c_literal{val=[]} :: #c_var{} | #c_literal{},
-- 
cgit v1.2.3