diff options
author | Son Ho | 2022-01-05 14:25:48 +0100 |
---|---|---|
committer | Son Ho | 2022-01-05 14:25:48 +0100 |
commit | 57a019c4b18d4f9a695f4520dd33d482abde3d5f (patch) | |
tree | 579e4529665c2c015596692db69e4d7ec28a8883 /src/Synthesis.ml | |
parent | d6b659f90735818dcc1fbeb92da9d74a5de2f495 (diff) |
Finish implementing the symbolic case of switch evaluation
Diffstat (limited to 'src/Synthesis.ml')
-rw-r--r-- | src/Synthesis.ml | 12 |
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 = () |