arch/.unmaintained/dummy/runprocess.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <exec/tasks.h>
   7 #include <clib/exec_protos.h>
   8 #include <dos/dosextens.h>
   9 #include "dos_intern.h"
  10
  11 LONG RunProcess(struct Process *proc, struct StackSwapStruct *sss,
  12 STRPTR argptr, ULONG argsize, LONG_FUNC entry)
  13 {
  14     LONG ret;
  15     APTR *sp;
  16     extern struct DosLibrary *DOSBase;
  17     sp=(APTR *)sss->stk_Upper;
  18     *--sp=SysBase;
  19     *--sp=(APTR)argsize;
  20     *--sp=argptr;
  21     sss->stk_Pointer=sp;
  22     StackSwap(sss);
  23     ret=entry();
  24     StackSwap(sss);
  25     return ret;
  26 }