compiler/autoinit/_programname.c

   1 /*
   2     Copyright © 1995-2014, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <aros/symbolsets.h>
   7 #include <aros/startup.h>
   8 #include <proto/dos.h>
   9
  10 #include "autoinit_intern.h"
  11
  12 char *_ProgramName = NULL;
  13
  14 void __initprogramname(struct ExecBase *SysBase)
  15 {
  16     char *cmd = __get_command_name();
  17
  18     _ProgramName = FilePart(cmd);
  19
  20     __startup_entries_next();
  21
  22     return;
  23 }
  24
  25 ADD2SET(__initprogramname, PROGRAM_ENTRIES, -20);