From: simonmar Date: Wed, 27 Oct 1999 15:29:37 +0000 (+0000) Subject: [project @ 1999-10-27 15:29:37 by simonmar] X-Git-Tag: Approximately_9120_patches~5655 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=3d0ff0957d63f49e687e0699aaa7ceef0ac210e5;p=ghc-hetmet.git [project @ 1999-10-27 15:29:37 by simonmar] Use C-style comments instead of assembler comments - the '#' confuses cpp when mkdependC'ing. --- diff --git a/ghc/rts/universal_call_c.S b/ghc/rts/universal_call_c.S index 49128c2..6b70dab 100644 --- a/ghc/rts/universal_call_c.S +++ b/ghc/rts/universal_call_c.S @@ -5,8 +5,8 @@ * Copyright (c) 1994-1999. * * $RCSfile: universal_call_c.S,v $ - * $Revision: 1.6 $ - * $Date: 1999/10/27 11:55:51 $ + * $Revision: 1.7 $ + * $Date: 1999/10/27 15:29:37 $ * ------------------------------------------------------------------------*/ #include "config.h" @@ -67,8 +67,10 @@ #if i386_TARGET_ARCH -# Tricky! Calls the specified function using ccall convention, -# *and* assumes that I myself was called using ccall. +/* + * Tricky! Calls the specified function using ccall convention, + * *and* assumes that I myself was called using ccall. + */ .globl universal_call_c_x86_ccall universal_call_c_x86_ccall: @@ -206,15 +208,15 @@ universal_call_c_x86_stdcall: fstpl 0(%esi) jmp .Lsbye .Lsbye: - ## don_t clear the args -- the callee does it - ## leal -12(%ebp),%esp + /* don_t clear the args -- the callee does it */ + /* leal -12(%ebp),%esp */ popl %ebx popl %esi popl %edi leave - ## ret $16 # but we have to clear our own! (no! we were ccall_d) + /* ret $16 # but we have to clear our own! (no! we were ccall_d) */ ret #endif /* i386_TARGET_ARCH */ -#endif /* INTERPRETER */ \ No newline at end of file +#endif /* INTERPRETER */