basic/source/runtime/wnt-mingw.s

   1 #
   2 # This file is part of the LibreOffice project.
   3 #
   4 # This Source Code Form is subject to the terms of the Mozilla Public
   5 # License, v. 2.0. If a copy of the MPL was not distributed with this
   6 # file, You can obtain one at http://mozilla.org/MPL/2.0/.
   7 #
   8 # This file incorporates work covered by the following license notice:
   9 #
  10 #   Licensed to the Apache Software Foundation (ASF) under one or more
  11 #   contributor license agreements. See the NOTICE file distributed
  12 #   with this work for additional information regarding copyright
  13 #   ownership. The ASF licenses this file to you under the Apache
  14 #   License, Version 2.0 (the "License"); you may not use this file
  15 #   except in compliance with the License. You may obtain a copy of
  16 #   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  17 #
  18
  19 .intel_syntax
  20
  21 .globl _DllMgr_call32@12
  22 .globl _DllMgr_callFp@12
  23
  24 _DllMgr_call32@12:
  25 _DllMgr_callFp@12:
  26     push ebp
  27     mov ebp, esp
  28     push esi
  29     push edi
  30     mov ecx, [ebp+16]
  31     jecxz $1
  32     sub esp, ecx
  33     mov edi, esp
  34     mov esi, [ebp+12]
  35     shr ecx, 2
  36     rep movsd
  37 $1: call DWORD PTR [ebp+8]
  38     # for extra safety, do not trust esp after call (in case the Basic Declare
  39     # signature is wrong):
  40     mov edi, [ebp-8]
  41     mov esi, [ebp-4]
  42     mov esp, ebp
  43     pop ebp
  44     ret 12