summaryrefslogtreecommitdiff
path: root/src/Synthesis.ml
diff options
context:
space:
mode:
authorSon Ho2022-01-05 14:25:48 +0100
committerSon Ho2022-01-05 14:25:48 +0100
commit57a019c4b18d4f9a695f4520dd33d482abde3d5f (patch)
tree579e4529665c2c015596692db69e4d7ec28a8883 /src/Synthesis.ml
parentd6b659f90735818dcc1fbeb92da9d74a5de2f495 (diff)
Finish implementing the symbolic case of switch evaluation
Diffstat (limited to 'src/Synthesis.ml')
-rw-r--r--src/Synthesis.ml12
1 files changed, 9 insertions, 3 deletions
diff --git a/src/Synthesis.ml b/src/Synthesis.ml
index 9ce6c8da..51aa0882 100644
--- a/src/Synthesis.ml
+++ b/src/Synthesis.ml
@@ -33,13 +33,19 @@ let synthesize_symbolic_expansion_no_branching (sv : V.symbolic_value)
(see : symbolic_expansion) : unit =
()
-(** Synthesize code for a symbolic expansion which leads to branching
- (for instance when evaluating the discriminant of a symbolic value).
+(** Synthesize code for a symbolic enum expansion (which leads to branching)
*)
-let synthesize_symbolic_expansion_branching (sv : V.symbolic_value)
+let synthesize_symbolic_expansion_enum_branching (sv : V.symbolic_value)
(seel : symbolic_expansion list) : unit =
()
+let synthesize_symbolic_expansion_if_branching (sv : V.symbolic_value) : unit =
+ ()
+
+let synthesize_symbolic_expansion_switch_int_branching (sv : V.symbolic_value) :
+ unit =
+ ()
+
let synthesize_unary_op (unop : E.unop) (op : V.typed_value)
(dest : V.symbolic_value) : unit =
()