diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 1996-05-16 14:19:17 +0000 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 1996-05-16 14:19:17 +0000 |
| commit | 5680e13197c6fb3fae483878e2ae3a2879c07b7c (patch) | |
| tree | 063b079bfca7ccbd25331340b9066ca5d91cf055 | |
| parent | 33029f6ed549634c03ff85f5a98db9997f9f613c (diff) | |
Bug dans les nouveaux caml_alloc*
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@821 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
| -rw-r--r-- | asmrun/i386.S | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/asmrun/i386.S b/asmrun/i386.S index 49e883e60..4902addde 100644 --- a/asmrun/i386.S +++ b/asmrun/i386.S @@ -80,7 +80,7 @@ L100: movl 0(%esp), %eax leal 4(%esp), %eax movl %eax, G(caml_bottom_of_stack) call L105 - jmp caml_alloc1 + jmp G(caml_alloc1) .align FUNCTION_ALIGN G(caml_alloc2): @@ -95,7 +95,7 @@ L101: movl 0(%esp), %eax leal 4(%esp), %eax movl %eax, G(caml_bottom_of_stack) call L105 - jmp caml_alloc2 + jmp G(caml_alloc2) .align FUNCTION_ALIGN G(caml_alloc3): @@ -110,7 +110,7 @@ L102: movl 0(%esp), %eax leal 4(%esp), %eax movl %eax, G(caml_bottom_of_stack) call L105 - jmp caml_alloc3 + jmp G(caml_alloc3) .align FUNCTION_ALIGN G(caml_alloc): @@ -129,7 +129,7 @@ L103: subl G(young_ptr), %eax /* eax = - size */ movl %eax, G(caml_bottom_of_stack) call L105 popl %eax /* recover desired size */ - jmp caml_alloc + jmp G(caml_alloc) /* Call a C function from Caml */ |