arch/m68k-amiga/expansion/writeexpansionword.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: english
   7 */
   8 #include "expansion_intern.h"
   9
  10 /*****************************************************************************
  11
  12     NAME */
  13 #include <clib/expansion_protos.h>
  14
  15         AROS_LH3(void, WriteExpansionWord,
  16
  17 /*  SYNOPSIS */
  18         AROS_LHA(APTR , board, A0),
  19         AROS_LHA(ULONG, offset, D0),
  20         AROS_LHA(ULONG, word, D1),
  21
  22 /*  LOCATION */
  23         struct ExpansionBase *, ExpansionBase, 27, Expansion)
  24
  25 {
  26     AROS_LIBFUNC_INIT
  27
  28         volatile UBYTE *b = (UBYTE*)board;
  29         volatile UWORD *w = (UWORD*)board;
  30
  31         b[offset * 4 + 4] = word;
  32         w[offset * 2 + 0] = word;
  33
  34     AROS_LIBFUNC_EXIT
  35 } /* WriteExpansionWord */