Commit 8e3e764a authored by Pietro Abate's avatar Pietro Abate
Browse files

[r2005-03-31 21:19:11 by afrisch] Empty log message

Original author: afrisch
Date: 2005-03-31 21:19:11+00:00
parent 0a65f2b7
......@@ -764,7 +764,7 @@ let rec ocaml2cduce_list f = function
let rec cduce2ocaml_list f v =
match normalize v with
| Pair (x,y) -> f x :: (cduce2ocaml_list f)
| Pair (x,y) -> f x :: (cduce2ocaml_list f y)
| _ -> []
let no_attr = Record LabelMap.empty
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment