From 8b1c4ce0c3659020e0f2a2e04d70798931dc9b63 Mon Sep 17 00:00:00 2001
From: Alasdair Armstrong
Date: Fri, 2 Aug 2019 16:48:36 +0100
Subject: Fix all warnings (except for two lem warnings)

Remove P_record as it's never been implemented in
parser/typechecker/rewriter, and is not likely to be. This also means
we can get rid of some ugliness with the fpat and mfpat types. Stubs
for P_or and P_not are left as they still may get added to ASL and we
might want to support them, although there are good reasons to keep
our patterns simple.

The lem warning for while -> while0 for ocaml doesn't matter because
it's only used in lem, and the 32-bit number warning is just noise.
---
 src/interpreter.ml | 1 -
 1 file changed, 1 deletion(-)

(limited to 'src/interpreter.ml')

diff --git a/src/interpreter.ml b/src/interpreter.ml
index a2cc17bf..6707bc0b 100644
--- a/src/interpreter.ml
+++ b/src/interpreter.ml
@@ -714,7 +714,6 @@ and pattern_match env (P_aux (p_aux, (l, _)) as pat) value =
        List.for_all fst matches, List.fold_left (Bindings.merge combine) Bindings.empty (List.map snd matches)
      else
        false, Bindings.empty
-  | P_record _ -> assert false (* TODO *)
   | P_vector pats ->
      let matches = List.map2 (pattern_match env) pats (coerce_gv value) in
      List.for_all fst matches, List.fold_left (Bindings.merge combine) Bindings.empty (List.map snd matches)
-- 
cgit v1.2.3