Renvoyer le resultat de weak_create...
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@1342 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02master
parent
7ae6388a94
commit
5890667e66
|
@ -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
|
||||
|
|
Loading…
Reference in New Issue