Ekdohibs
/
ocaml
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

patch for keeping variable names 

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@11145 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Jacques Garrigue 2011-07-23 11:24:31 +00:00
parent 952c0170ee
commit e5d0fb1786
2 changed files with 1618 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1614
experimental/garrigue/variable-names-Tvar.diffs Normal file
View File

File diff suppressed because it is too large Load Diff

4
experimental/garrigue/variable-names.ml Normal file
View File

@ -0,0 +1,4 @@
let f (x : < a:int; .. > as 'me1) = (x : < b:bool; .. > as 'me2);;
let f (x : < a:int; .. > as 'me1) = (x : < a:int; b:bool; .. > as 'me2);;
let f (x : [> `A of int] as 'me1) = (x : [> `B of bool] as 'me2);;
let f (x : [> `A of int] as 'me1) = (x : [`A of int | `B of 'me2] as 'me2);;