aboutsummaryrefslogtreecommitdiff
path: root/stm
diff options
context:
space:
mode:
authorMatej Kosik2015-12-16 16:19:51 +0100
committerMatej Kosik2016-01-11 14:59:26 +0100
commita1aff01d16bad2f44392fd5cb804092e12e558ed (patch)
treebd2a1faf08b1c399171a308cf45bfd46d60ab5c5 /stm
parent78bad016e389cd78635d40281bfefd7136733b7e (diff)
CLEANUP: removing unused field
I have removed the second field of the "Constrexpr.CRecord" variant because once it was set to "None" it never changed to anything else. It was just carried and copied around.
Diffstat (limited to 'stm')
-rw-r--r--stm/texmacspp.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/stm/texmacspp.ml b/stm/texmacspp.ml
index b18e35a472..70eccc2403 100644
--- a/stm/texmacspp.ml
+++ b/stm/texmacspp.ml
@@ -457,7 +457,7 @@ and pp_expr ?(attr=[]) e =
(return @
[Element ("scrutinees", [], List.map pp_case_expr cel)] @
[pp_branch_expr_list bel]))
- | CRecord (_, _, _) -> assert false
+ | CRecord (_, _) -> assert false
| CLetIn (loc, (varloc, var), value, body) ->
xmlApply loc
(xmlOperator "let" loc ::