diff options
Diffstat (limited to 'library/heads.ml')
| -rw-r--r-- | library/heads.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/heads.ml b/library/heads.ml index ea3acbbe8..ba3a45594 100644 --- a/library/heads.ml +++ b/library/heads.ml @@ -164,7 +164,7 @@ let (inHead, _) = cache_function = cache_head; load_function = load_head; subst_function = subst_head; - classify_function = (fun (_,x) -> Substitute x); + classify_function = (fun x -> Substitute x); discharge_function = discharge_head; rebuild_function = rebuild_head; export_function = export_head } |