diff options
| author | Kathy Gray | 2014-11-21 15:46:23 +0000 |
|---|---|---|
| committer | Kathy Gray | 2014-11-21 15:46:23 +0000 |
| commit | 405fa876b603703185ea834f65ddd14808544331 (patch) | |
| tree | ac3de61e2703e4e6b93eaf6435105a807984eab5 /src/lem_interp/interp_lib.lem | |
| parent | a2ffb770435e398fd23efce9e9a1238a914bfbee (diff) | |
Print out default values for underspecified vectors instead of leaving them and letting them turn into undefineds
Diffstat (limited to 'src/lem_interp/interp_lib.lem')
| -rw-r--r-- | src/lem_interp/interp_lib.lem | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/lem_interp/interp_lib.lem b/src/lem_interp/interp_lib.lem index 483253b6..6c6bbb46 100644 --- a/src/lem_interp/interp_lib.lem +++ b/src/lem_interp/interp_lib.lem @@ -142,6 +142,7 @@ let rec to_vec_inc (V_tuple[v1;v2]) = match (v1,v2) with | (v1,V_track v2 r2) -> taint (to_vec_inc (V_tuple[v1;v2])) r2 | (V_unknown,_) -> V_unknown | (_,V_unknown) -> V_unknown + | _ -> Assert_extra.failwith ("to_vec_inc parameters were " ^ (string_of_value (V_tuple[v1;v2]))) end ;; let rec to_vec_dec (V_tuple([v1;v2])) = match (v1,v2) with |