diff options
| author | Pierre-Marie Pédrot | 2014-01-19 17:20:58 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2014-01-19 17:35:59 +0100 |
| commit | a532777dcfc59128be2daa7cc74c7881a06f8cb3 (patch) | |
| tree | 97cde2983485df683a6a82780f1365c47aacadf7 /tactics | |
| parent | 7e6e533b148c9d57251388e9f1646a6829d10bfb (diff) | |
Adding a default object to generic argument registering mechanism.
Diffstat (limited to 'tactics')
| -rw-r--r-- | tactics/geninterp.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/tactics/geninterp.ml b/tactics/geninterp.ml index 2e95670d61..e9d3f42925 100644 --- a/tactics/geninterp.ml +++ b/tactics/geninterp.ml @@ -24,6 +24,7 @@ module InterpObj = struct type ('raw, 'glb, 'top) obj = ('glb, 'top) interp_fun let name = "interp" + let default _ = None end module Interp = Register(InterpObj) |