diff options
Diffstat (limited to 'testasmcomp/i386nt.asm')
| -rw-r--r-- | testasmcomp/i386nt.asm | 67 |
1 files changed, 0 insertions, 67 deletions
diff --git a/testasmcomp/i386nt.asm b/testasmcomp/i386nt.asm deleted file mode 100644 index 66550eb8b2..0000000000 --- a/testasmcomp/i386nt.asm +++ /dev/null @@ -1,67 +0,0 @@ -;********************************************************************* -; -; Objective Caml -; -; Xavier Leroy, projet Cristal, INRIA Rocquencourt -; -; Copyright 1996 Institut National de Recherche en Informatique et -; en Automatique. All rights reserved. This file is distributed -; under the terms of the Q Public License version 1.0. -; -;********************************************************************* - -; $Id$ - - .386 - .MODEL FLAT - - .CODE - PUBLIC _call_gen_code - ALIGN 4 -_call_gen_code: - push ebp - mov ebp, esp - push ebx - push esi - push edi - mov eax, [ebp+12] - mov ebx, [ebp+16] - mov ecx, [ebp+20] - mov edx, [ebp+24] - call DWORD PTR [ebp+8] - pop edi - pop esi - pop ebx - pop ebp - ret - - PUBLIC _caml_c_call - ALIGN 4 -_caml_c_call: - ffree st(0) - ffree st(1) - ffree st(2) - ffree st(3) - jmp eax - - PUBLIC _caml_call_gc - PUBLIC _caml_alloc - PUBLIC _caml_alloc1 - PUBLIC _caml_alloc2 - PUBLIC _caml_alloc3 -_caml_call_gc: -_caml_alloc: -_caml_alloc1: -_caml_alloc2: -_caml_alloc3: - int 3 - - .DATA - PUBLIC _caml_exception_pointer -_caml_exception_pointer dword 0 - PUBLIC _young_ptr -_young_ptr dword 0 - PUBLIC _young_limit -_young_limit dword 0 - - END |