terminal and fatal modules, cleaner hiding of FromStdlib functions and renamed exposed module to general

This commit is contained in:
2022-01-30 11:55:42 +11:00
committed by aaron-jack-manning
parent a8cdd2411f
commit e9368e17c1
36 changed files with 306 additions and 165 deletions
+2 -2
View File
@@ -1,4 +1,4 @@
open FromStdlib
open General
module type Map = sig
type key
@@ -63,6 +63,6 @@ module RBTreeMap (M : MapSpecification) : Map with type key = M.key = struct
let insert ((k, v) : (key * 'v)) map =
match insert_helper (k, v) map with
| Branch (_, (key, value), left, right) -> Branch (Black, (key, value), left, right)
| Leaf -> failwith "if this exception is raised there is an error in the implementation of the function that called it"
| Leaf -> Fatal.failwith "if this exception is raised there is an error in the implementation of the function that called it"
end