home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 3 / Meeting_Pearls_III.iso / Pearls / midi / Editors_and_Tools / OberSuite-1.03 / src / parse.c < prev    next >
C/C++ Source or Header  |  1993-01-23  |  2KB  |  52 lines
  1. /**************************************************************************
  2. * parse.c:    General functions for the command-line user interface.
  3. *        A part of OberSuite for the Commodore Amiga.
  4. *
  5. * Author:    Daniel Barrett, barrett@cs.umass.edu.
  6. * Version:    1.0.
  7. * Copyright:    None!  This program is in the Public Domain.
  8. *        Please share it with others.
  9. ***************************************************************************/
  10.  
  11. #include "decl.h"
  12. #include "oberheim.h"
  13.  
  14.  
  15. /***************************************************************************
  16. * Does the given value fall between "low" and "high", inclusive?
  17. ***************************************************************************/
  18.  
  19. int Between(int value, int low, int high)
  20. {
  21.     return ((value >= low) && (value <= high));
  22. }
  23.  
  24.  
  25. /***************************************************************************
  26. * Return TRUE if and only if the string "str" consists only of digits.
  27. ***************************************************************************/
  28.  
  29. BOOL AllDigits(char *str)
  30. {
  31.     if ((!str) || (*str == '\0'))        /* NULL or empty string. */
  32.         return(FALSE);
  33.     else
  34.         while (*str)            /* For each character... */
  35.             if (!isdigit(*str))    /*  if not a digit...    */
  36.                 return(FALSE);    /*  goodbye!             */
  37.             else
  38.                 str++;
  39.     return(TRUE);                /* All were digits.      */
  40. }
  41.  
  42.  
  43. /***************************************************************************
  44. * We are not using the Workbench interface, so we can save a little space
  45. * by replacing the system's _wb_parse() function with a stub.
  46. ***************************************************************************/
  47.  
  48. void _wb_parse()
  49. {
  50.     /* Stub:  we don't need WB startup code. */
  51. }
  52.