arch/.unmaintained/dummy/getcc.c

   1 |*****************************************************************************
   2 |
   3 |   NAME
   4 |
   5 |       __AROS_LH0(UWORD, GetCC,
   6 |
   7 |   LOCATION
   8 |       struct ExecBase *, SysBase, 88, Exec)
   9 |
  10 |   FUNCTION
  11 |       Read the contents of the sr in a easy and compatible way.
  12 |
  13 |   INPUTS
  14 |
  15 |   RESULT
  16 |       The contents of sr as a UWORD.
  17 |
  18 |   NOTES
  19 |       This function will most likely be implemented by a few instructions
  20 |       directly in the jumptable.
  21 |
  22 |   EXAMPLE
  23 |
  24 |   BUGS
  25 |
  26 |   SEE ALSO
  27 |       SetSR()
  28 |
  29 |   INTERNALS
  30 |
  31 |   HISTORY
  32 |
  33 |******************************************************************************
  34
  35         | This function is implemented directly in the jumptable - but it
  36         | doesn't harm to see what it looks like.
  37         | 68000 version
  38         .globl  _Exec_GetCC
  39 _Exec_GetCC:
  40         movew   sr,d0
  41         rts
  42
  43         | 68010 and up
  44         .globl  _Exec_GetCC_01
  45 _Exec_GetCC_01:
  46         movew   ccr,d0
  47         rts
  48