Renvoyer le resultat de weak_create...

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@1342 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
1997-03-08 12:16:01 +00:00 · 1997-03-08 12:16:01 +00:00 · 5890667e66
parent 7ae6388a94
commit 5890667e66
1 changed files with 1 additions and 0 deletions
--- a/byterun/weak.c
+++ b/byterun/weak.c
@ -32,6 +32,7 @@ value weak_create (len)        /* ML */
  for (i = 1; i < size; i++) Field (res, i) = 0;
  Field (res, 0) = weak_list_head;
  weak_list_head = res;
+  return res;
 }

 #define None_val 1