test/dos/exit.c

   1 /*
   2     Copyright © 1995-2015, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <proto/exec.h>
   7 #include <proto/dos.h>
   8
   9 struct DosLibrary *DOSBase;
  10 static unsigned int level = 0;
  11
  12 void test()
  13 {
  14     Printf("Nest level: %lu\n", ++level);
  15
  16     if (level < 20)
  17         test();
  18
  19     Exit(0);
  20     Printf("Exit() did not work!\n");
  21 }
  22
  23 __startup static AROS_PROCH(Start, argstr, argsize, SysBase)
  24 {
  25     AROS_PROCFUNC_INIT
  26
  27     struct Process *me;
  28     IPTR *stackbase;
  29
  30     DOSBase = (struct DosLibrary *)OpenLibrary("dos.library", 36);
  31     if (!DOSBase)
  32         return RETURN_FAIL;
  33
  34     /* Let's check correctness of stack size passing */
  35     me = (struct Process *)FindTask(NULL);
  36     stackbase = me->pr_ReturnAddr;
  37     Printf("Launch stack size is %ld, total size is %ld\n", stackbase[0],
  38         me->pr_Task.tc_SPUpper - me->pr_Task.tc_SPLower);
  39
  40     test();
  41
  42     CloseLibrary(&DOSBase->dl_lib);
  43     return RETURN_OK;
  44
  45     AROS_PROCFUNC_EXIT
  46 }