home *** CD-ROM | disk | FTP | other *** search
/ World of A1200 / World_Of_A1200.iso / programs / disk / misc / dcmp / source / source.lha / xtoy.h < prev   
Encoding:
C/C++ Source or Header  |  1992-10-02  |  1.2 KB  |  28 lines
  1. /*--------------------------------------------------------------------------*
  2.   xtoy.h  (c) Copyright 1991,92 Tobias Ferber.  All Rights Reserved.
  3.  *--------------------------------------------------------------------------*/
  4.  
  5. #include <exec/types.h>
  6. #include <libraries/dosextens.h>
  7. #include <stdio.h>
  8.  
  9. extern char *itor(int, char *);   /* convert integer to roman */
  10. extern char *strupr(char *);      /* covert string to upper case */
  11. extern char *strlower(char *);    /* convert string to lower case */
  12. extern long dectol(char *);       /* decimal string to long conversion */
  13. extern long hextol(char *);       /* hex string to long conversion */
  14. extern char *binstr(long, int);   /* binary string of a long with int digits */
  15.  
  16. #define isupper(c)  ((c)>='A'&&(c)<='Z')
  17. #define islower(c)  ((c)>='a'&&(c)<='z')
  18. #define isletter(c) (isupper(c)||islower(c))
  19. #define isalpha(c)  (isletter(c)||isdigit(c))
  20. #define isdigit(c)  ((c)>='0'&&(c)<='9')
  21.  
  22. #define ishexdigit(c) (('0'<=(c) && (c)<='9') || \
  23.                        ('A'<=(c) && (c)<='F') || \
  24.                        ('a'<=(c) && (c)<='f'))
  25.  
  26. #define toupper(c)  (islower(c)?((c)-'a'+'A'):(c))
  27. #define tolower(c)  (isupper(c)?((c)-'A'+'a'):(c))
  28.