test/dos/exit.c

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