8 lines
196 B
Forth
8 lines
196 B
Forth
|
namespace Pentole
|
||
|
|
|
||
|
|
module Map =
|
||
|
|
let find (key: 'key) (map: Map<'key, 'value>) =
|
||
|
|
match Map.tryFind key map with
|
||
|
|
| Some v -> Ok v
|
||
|
|
| None -> Error $"Can't find key {key}"
|