diff options
| author | Pierre-Marie Pédrot | 2016-01-17 01:08:21 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2016-01-17 01:13:23 +0100 |
| commit | 0d1345ea2423fc418a470786b0b33b80df3a67bc (patch) | |
| tree | 72aa847e645f0662c9f5241ea1f17ca4107390af /interp | |
| parent | 43490147b0749f46eb90ff69c3bbdb3991fb526c (diff) | |
Temporary commit getting rid of Obj.magic unsafety for Genarg.
This will allow an easier landing of the rewriting of Genarg.
Diffstat (limited to 'interp')
| -rw-r--r-- | interp/constrarg.ml | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/interp/constrarg.ml b/interp/constrarg.ml index a8dfd02e1d..f8957a24b8 100644 --- a/interp/constrarg.ml +++ b/interp/constrarg.ml @@ -19,9 +19,6 @@ let loc_of_or_by_notation f = function | AN c -> f c | ByNotation (loc,s,_) -> loc -let unsafe_of_type (t : argument_type) : ('a, 'b, 'c) Genarg.genarg_type = - Obj.magic t - let wit_int_or_var = Genarg.make0 ~dyn:(val_tag (topwit Stdarg.wit_int)) None "int_or_var" |