home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / database / query87.zip / QCHAR.C < prev    next >
Text File  |  1988-05-31  |  515b  |  42 lines
  1. /*
  2.  
  3.     Routines for retrieving global variables from Clipper - Summer '87
  4.  
  5.     R. Whitt  -  5/28/88
  6.  
  7. */
  8.  
  9.  
  10. #include "nandef.h"
  11. #include "extend.h"
  12.  
  13.  
  14.  
  15. /*  Chracter & String Values  */
  16.  
  17.  
  18. extern char _ldelim[];
  19. extern char _rdelim[];
  20. extern char _path[];
  21. extern char _default_drive[];
  22.  
  23. CLIPPER ldelim()
  24. {
  25.    _retclen( _ldelim, 1 );
  26. }
  27.  
  28. CLIPPER rdelim()
  29. {
  30.    _retclen( _rdelim, 1 );
  31. }
  32.  
  33. CLIPPER getpath()
  34. {
  35.    _retc( _path );
  36. }
  37.  
  38. CLIPPER getdefa()
  39. {
  40.    _retc( _default_drive );
  41. }
  42.