home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 1 / amigaformatcd01.iso / demos / secal / inc / secallib.inc
Encoding:
Text File  |  1996-04-30  |  1.7 KB  |  71 lines
  1. /******************************************************************************\
  2. **  $VER: inc/secallib.inc 0.89                                               **
  3. **  Secal Release 0.89                                                        **
  4. **  Secal.lib interface definitions                                           **
  5. **  Copyright (c) 1996 Tibor Kulcsar & Jozsef Makrai (TDS Development)        **
  6. \******************************************************************************/
  7.  
  8.  
  9. import _strlen;
  10. import _strcopy;
  11. import _strcopym;
  12. import _strdiff;
  13. import _strdiffi;
  14. import _strcat;
  15. import _strcatm;
  16.  
  17.  
  18. #-------------------------------------------------------------------------------
  19.  
  20.  
  21. pattern strlen(_str) is                    # D0.L=LENGTH, A0=STR END
  22. a0:=_str;
  23. call _strlen;
  24. endp;                                                            # STRLEN
  25.  
  26.  
  27.  
  28. pattern strcopy(_source,_dest) is                # A0=DEST END
  29. safe a0:=_source; a1:=_dest;;
  30. call _strcopy;
  31. endp;                                                            # STRCOPY
  32.  
  33.  
  34.  
  35. pattern strcopym(_source,_dest,_max) is                # A0=DEST END
  36. safe a0:=_source; a1:=_dest; d0.l:=_max;;
  37. call _strcopym;
  38. endp;                                                            # STRCOPYM
  39.  
  40.  
  41.  
  42. pattern strdiff(_source,_dest) is                # D0=FIRST DIFF, OR 0
  43. safe a0:=_source; a1:=_dest;;
  44. call _strdiff;
  45. endp;                                                            # STRDIFF
  46.  
  47.  
  48.  
  49. pattern strdiffi(_source,_dest) is                # D0=FIRST DIFF, OR 0
  50. safe a0:=_source; a1:=_dest;;
  51. call _strdiffi;
  52. endp;                                                            # STRDIFFI
  53.  
  54.  
  55.  
  56. pattern strcat(_source,_dest) is                # A0=DEST END
  57. safe a0:=_source; a1:=_dest;;
  58. call _strcat;
  59. endp;                                                            # STRCAT
  60.  
  61.  
  62.  
  63. pattern strcatm(_source,_dest,_max) is                # A0=DEST END
  64. safe a0:=_source; a1:=_dest; d0.l:=_max;;
  65. call _strcatm;
  66. endp;                                                            # STRCATM
  67.  
  68.  
  69. #-------------------------------------------------------------------------------
  70.  
  71.