balsoft/ligo
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fixed unused variable warning

Browse Source
This commit is contained in:
Georges Dupéron 2019-05-15 15:14:49 +02:00
parent 6ccdf0bf9e
commit 3a7d2a85f1
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
simple-utils/x_list.ml
View File

@ -2,7 +2,7 @@ include List
let rec remove n = function let rec remove n = function
| [] -> raise (Failure "List.remove") | [] -> raise (Failure "List.remove")
| hd :: tl when n = 0 -> tl | _ :: tl when n = 0 -> tl
| hd :: tl -> hd :: remove (n - 1) tl | hd :: tl -> hd :: remove (n - 1) tl