home *** CD-ROM | disk | FTP | other *** search
/ Amiga MA Magazine 1998 #6 / amigamamagazinepolishissue1998.iso / coders / barfly / hellogcc.c < prev    next >
C/C++ Source or Header  |  1977-12-31  |  867b  |  55 lines
  1. ;/*
  2. gcc -g -gstabs -o hellogcc -lger -lamiga hellogcc.c
  3. quit
  4. ;*/
  5.  
  6. #include    "exec/execbase.h"
  7. #include    "dos/dosextens.h"
  8. #include    "inline/dos.h"
  9. /*#undef    amiga*/
  10. #include    <stdio.h>
  11.  
  12. void volatile exit __P((int));
  13.  
  14. typedef struct CommandLineInterface    CLI;
  15. typedef struct Process            PROCESS;
  16.  
  17. extern struct ExecBase            *SysBase;
  18.  
  19. PROCESS    *p;
  20. CLI    *cli;
  21.  
  22. void    testfunc(void)
  23. {
  24.     Printf("testfunc()\n");
  25. }
  26.  
  27. int    main(int    ac,
  28.              char    *av[]) 
  29. {
  30.     short    i;
  31.     char    s[256], *ps;
  32.  
  33.     testfunc();
  34.     if (GetProgramName(s, 256))
  35.         Printf("Program name = '%s'\n", s);
  36.     else
  37.         Printf("No program name\n");
  38.  
  39.     p = (PROCESS *)SysBase->ThisTask;
  40.     cli = BADDR(p->pr_CLI);
  41.  
  42.     ps = BADDR(cli->cli_CommandName);
  43.     Printf("hello, world\n");
  44.     Printf("Command Line = '%s'\n", ps);
  45.     for (i=0; i<ac; i++)
  46.         Printf("arg %d = '%s'\n", i, av[i]);
  47.  
  48.         return(0);
  49. }
  50.  
  51. void    abort(void)
  52. {
  53.     exit(0);
  54. }
  55.