home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 15 / BBS in a box XV-2.iso / Files II / Prog / M / MacPerl 4.13 source.sit / Perl Source ƒ / MacPerl / MPAEUtils.h < prev    next >
Encoding:
C/C++ Source or Header  |  1994-02-27  |  1.7 KB  |  61 lines  |  [TEXT/MPS ]
  1. /*********************************************************************
  2. Project    :    MacPerl            -    Real Perl Application
  3. File        :    MPAEUtils.h        -
  4. Author    :    Matthias Neeracher
  5.  
  6. A lot of this code is borrowed from 7Edit written by
  7. Apple Developer Support UK
  8.  
  9. Language    :    MPW C
  10.  
  11. $Log: MPAEUtils.h,v $
  12. Revision 1.1  1994/02/27  23:02:37  neeri
  13. Initial revision
  14.  
  15. Revision 0.1  1993/05/29  00:00:00  neeri
  16. Compiles correctly
  17.  
  18. *********************************************************************/
  19.  
  20.  
  21. #include <Types.h>
  22. #include <QuickDraw.h>
  23. #include <Packages.h>
  24. #include <GestaltEqu.h>
  25. #include <Editions.h>
  26. #include <Printing.h>
  27. #include <AppleEvents.h>
  28. #include <ToolUtils.h>
  29.  
  30. #ifndef __MPAEUTILS__
  31. #define __MPAEUTILS__
  32.  
  33. /**-----------------------------------------------------------------------
  34.     Utility Routines for getting data from AEDesc's
  35.   -----------------------------------------------------------------------**/
  36.  
  37. pascal void GetRawDataFromDescriptor(    const AEDesc *theDesc,
  38.                                                     Ptr     destPtr,
  39.                                                     Size    destMaxSize,
  40.                                                     Size    *actSize);
  41.  
  42. pascal OSErr GetPStringFromDescriptor(    const AEDesc *sourceDesc, char *resultStr);
  43.  
  44. pascal OSErr GetIntegerFromDescriptor(    const AEDesc *sourceDesc, short *result);
  45.  
  46. pascal OSErr GetBooleanFromDescriptor(    const AEDesc *sourceDesc,
  47.                                                     Boolean *result);
  48.  
  49. pascal OSErr GetLongIntFromDescriptor(    const AEDesc *sourceDesc,
  50.                                           long   *result);
  51.  
  52. pascal OSErr GetRectFromDescriptor(        const AEDesc *sourceDesc, Rect *result);
  53.  
  54. pascal OSErr GetPointFromDescriptor(    const AEDesc *sourceDesc,
  55.                                                     Point  *result);
  56.  
  57. pascal OSErr GetTextFromDescIntoTEHandle(
  58.                                                     const AEDesc *sourceTextDesc,
  59.                                                     TEHandle theHTE);
  60.  
  61. #endif