Commits

seanmcl committed 1872d5a

fix hash for 32 bit machines

Comments (0)

Files changed (1)

ocaml/omake/error.ml

   full_text : string option;
 } with sexp, fields
 
+(* Emacs compiled on a 32 bit machine can only handle 2^28 hash.  Not sure why. *)
+let hash m = Hashtbl.hash m mod 268435456
+
 let make m =
-  let hash = Hashtbl.hash m in
+  let hash = hash m in
   { hash
   ; relpath = m.Make.relpath
   ; file = m.Make.file