Add state.ml
This commit is contained in:
parent
a206b9d7ca
commit
a17a03aaef
9
src/core/state.ml
Normal file
9
src/core/state.ml
Normal file
|
@ -0,0 +1,9 @@
|
||||||
|
(* State of the world, contains all the required information at any point *)
|
||||||
|
type t = {
|
||||||
|
cartridge : option Cartridge.t;
|
||||||
|
}
|
||||||
|
|
||||||
|
(* Global reference *)
|
||||||
|
let state = ref {
|
||||||
|
cartridge = None
|
||||||
|
}
|
Loading…
Reference in a new issue