vault backup: 2023-10-16 14:57:34
This commit is contained in:
parent
7eaa933e99
commit
f625d132c9
@ -251,6 +251,6 @@ let assos k l =
|
||||
invalid_arg "k not natural"
|
||||
else
|
||||
match l with
|
||||
| -> failwith "not found"
|
||||
| -> failwith "not found"
|
||||
| (k,y)::t -> y
|
||||
| _ -> assos k t
|
||||
|
Loading…
x
Reference in New Issue
Block a user