compiler/alib/argint.c

   1 /*
   2     Copyright © 1995-2016, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 /*****************************************************************************
   7
   8     NAME */
   9
  10 #include <dos/dosextens.h>
  11 #include <proto/icon.h>
  12 #include <proto/dos.h>
  13 #include <stdlib.h>
  14
  15 extern struct Library *IconBase;
  16
  17        LONG  ArgInt(
  18
  19 /*  SYNOPSIS */
  20        UBYTE  **tt,
  21        STRPTR   entry,
  22        LONG     defaultval)
  23
  24
  25 /*  FUNCTION
  26         Returns the value associated with the string 'entry' found in the
  27         tooltypes array 'tt'. If no match with entry was found,
  28         'defaultval' is returned.
  29
  30     INPUTS
  31         tt          --  the tooltypes array ( returned by ArgArrayInit() )
  32         entry       --  entry to look for (in tooltype "entry=value")
  33         defaultval  --  value returned if 'entry' was not found
  34
  35     RESULT
  36         (The tooltypes looks like "Entry=Value".) Returns Value if Entry
  37         was found; otherwise returns 'defaultval'.
  38
  39     NOTES
  40
  41     EXAMPLE
  42
  43     BUGS
  44
  45     SEE ALSO
  46         ArgArrayInit()
  47
  48     INTERNALS
  49         The Amiga documentation says "requires that dos.library V36 or
  50         higher is opened". I can't see why.
  51
  52 *****************************************************************************/
  53 {
  54     STRPTR  match;
  55     LONG result = defaultval;
  56
  57     if((match = FindToolType(tt, entry)) == NULL)
  58         return defaultval;
  59
  60     StrToLong(match, &result);
  61     return result;
  62
  63 } /* ArgArrayInt */