src/system/libroot/posix/glibc/include/arch/m68k/sysdep.h

   1 /* Assembler macros for m68k.
   2    Copyright (C) 1998 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4
   5    The GNU C Library is free software; you can redistribute it and/or
   6    modify it under the terms of the GNU Lesser General Public
   7    License as published by the Free Software Foundation; either
   8    version 2.1 of the License, or (at your option) any later version.
   9
  10    The GNU C Library is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13    Lesser General Public License for more details.
  14
  15    You should have received a copy of the GNU Lesser General Public
  16    License along with the GNU C Library; if not, write to the Free
  17    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  18    02111-1307 USA.  */
  19
  20 #include_next <sysdep.h>
  21
  22 #ifdef __ASSEMBLER__
  23
  24 /* Syntactic details of assembler.  */
  25
  26 #ifdef HAVE_ELF
  27
  28 /* ELF uses byte-counts for .align, most others use log2 of count of bytes.  */
  29 #define ALIGNARG(log2) 1<<log2
  30 /* For ELF we need the `.type' directive to make shared libs work right.  */
  31 #define ASM_TYPE_DIRECTIVE(name,typearg) .type name,typearg
  32 #define ASM_SIZE_DIRECTIVE(name) .size name,.-name
  33
  34 /* In ELF C symbols are asm symbols.  */
  35 #undef  NO_UNDERSCORES
  36 #define NO_UNDERSCORES
  37
  38 #else
  39
  40 #define ALIGNARG(log2) log2
  41 #define ASM_TYPE_DIRECTIVE(name,type)   /* Nothing is specified.  */
  42 #define ASM_SIZE_DIRECTIVE(name)        /* Nothing is specified.  */
  43
  44 #endif
  45
  46
  47 /* Define an entry point visible from C.
  48
  49    There is currently a bug in gdb which prevents us from specifying
  50    incomplete stabs information.  Fake some entries here which specify
  51    the current source file.  */
  52 #define ENTRY(name)                                                           \
  53   .globl C_SYMBOL_NAME(name);                                                 \
  54   ASM_TYPE_DIRECTIVE (C_SYMBOL_NAME(name),@function);                         \
  55   .align ALIGNARG(2);                                                         \
  56   C_LABEL(name)                                                               \
  57   CALL_MCOUNT
  58
  59 #undef END
  60 #define END(name) ASM_SIZE_DIRECTIVE(name)
  61
  62
  63 /* If compiled for profiling, call `_mcount' at the start of each function.  */
  64 #ifdef  PROF
  65 /* The mcount code relies on a normal frame pointer being on the stack
  66    to locate our caller, so push one just for its benefit.  */
  67 #define CALL_MCOUNT \
  68   move.l %fp, -(%sp); move.l %sp, %fp;                                        \
  69   jbsr JUMPTARGET (mcount);                                                   \
  70   move.l (%sp)+, %fp;
  71 #else
  72 #define CALL_MCOUNT             /* Do nothing.  */
  73 #endif
  74
  75 #ifdef  NO_UNDERSCORES
  76 /* Since C identifiers are not normally prefixed with an underscore
  77    on this system, the asm identifier `syscall_error' intrudes on the
  78    C name space.  Make sure we use an innocuous name.  */
  79 #define syscall_error   __syscall_error
  80 #define mcount          _mcount
  81 #endif
  82
  83 #define PSEUDO(name, syscall_name, args)                                      \
  84   .globl syscall_error;                                                       \
  85   ENTRY (name)                                                                \
  86     DO_CALL (syscall_name, args);                                             \
  87     jcc JUMPTARGET(syscall_error)
  88
  89 #undef PSEUDO_END
  90 #define PSEUDO_END(name)                                                      \
  91   END (name)
  92
  93 #ifdef PIC
  94 #define JUMPTARGET(name)        name##@PLTPC
  95 #else
  96 #define JUMPTARGET(name)        name
  97 #endif
  98
  99 #endif  /* __ASSEMBLER__ */