Commit 4a020d87 authored by Pietro Abate's avatar Pietro Abate

[r2005-07-05 15:46:03 by afrisch] Empty log message

Original author: afrisch
Date: 2005-07-05 15:46:03+00:00
parent a05e7ec2
...@@ -43,6 +43,6 @@ let register c s = ...@@ -43,6 +43,6 @@ let register c s =
"Collision on descriptors for CDuce units: %s and %s" "Collision on descriptors for CDuce units: %s and %s"
(Hashtbl.find ctbl c) s (Hashtbl.find ctbl c) s
); );
Printf.eprintf "Register %s\n" s; (* Printf.eprintf "Register %s\n" s; *)
Hashtbl.add ctbl c s Hashtbl.add ctbl c s
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