diff options
Diffstat (limited to 'library/lib.ml')
-rw-r--r-- | library/lib.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/library/lib.ml b/library/lib.ml index 9c434fdf1..254134710 100644 --- a/library/lib.ml +++ b/library/lib.ml @@ -80,8 +80,8 @@ let add_anonymous_entry node = let sp = make_path (anonymous_id()) OBJ in add_entry sp node -let add_leaf id obj = - let sp = make_path id OBJ in +let add_leaf id kind obj = + let sp = make_path id kind in add_entry sp (Leaf obj); sp |