aboutsummaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorGravatar Matej Kosik <matej.kosik@inria.fr>2017-02-02 11:20:51 +0100
committerGravatar Matej Košík <matej.kosik@inria.fr>2017-04-20 13:11:50 +0200
commitdda06512833eea2805a8406b407494014371b2be (patch)
treeec681ba4d8630c033a2599040b775051ba847fdf
parent2198b0b28a396377ed8f885eddf6bc752af9c580 (diff)
refactoring "Names.DirPath.is_empty" function
-rw-r--r--kernel/names.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/names.ml b/kernel/names.ml
index b91fa758f..5c10badbe 100644
--- a/kernel/names.ml
+++ b/kernel/names.ml
@@ -178,7 +178,7 @@ struct
let empty = []
- let is_empty d = match d with [] -> true | _ -> false
+ let is_empty = List.is_empty
let to_string = function
| [] -> "<>"