[r2004-06-28 03:54:06 by afrisch] Empty log message

Original author: afrisch
Date: 2004-06-28 03:54:06+00:00

driver/librarian.ml

@@ -192,7 +192,7 @@ let rec load id =
       try open_in obj
       with Sys_error _ -> raise (CannotOpen obj) in
 
-    let (dig, depend, raw) = 
+    let (dig, depend, raw, stub) = 
       try Marshal.from_channel ic
       with Failure _ | End_of_file -> raise (InvalidObject obj) in
 

ocamliface/mlstub.ml

@@ -2,13 +2,8 @@
 
 (* TODO:
    - optimizations: generate labels and atoms only once.
-   - implement functions OCaml -> CDuce 
-   - references OCaml -> CDuce (need functions)
    - MD5 checksum
    - embeded CDuce code in OCaml
-  
-  Note: for functions, the problem is to generate types. Solution:
-  put them in some global slots of the .cmo and fetch them from there.
 *)