arch/ppc-sam440/exec/supervisor.c

   1 /*
   2     Copyright © 1995-2013, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Supervisor() - Execute some code in a privileged environment.
   6     Lang: english
   7 */
   8
   9 #include <proto/exec.h>
  10 #include <asm/amcc440.h>
  11
  12 /* See rom/exec/supervisor.c for documentation */
  13
  14 AROS_LH1(ULONG, Supervisor,
  15     AROS_LHA(ULONG_FUNC, userFunction, A5),
  16     struct ExecBase *, SysBase, 5, Exec)
  17 {
  18     AROS_LIBFUNC_INIT
  19
  20     register ULONG retval;
  21     register APTR stack;
  22
  23     stack = SuperState();
  24
  25     retval = (*userFunction)();
  26
  27     UserState(stack);
  28
  29     return retval;
  30
  31     AROS_LIBFUNC_EXIT
  32 } /* Supervisor() */