home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 4 / FreshFish_May-June1994.bin / bbs / cbm / nduk-v37.lha / V37 / include / rexx / errors.i < prev    next >
Text File  |  1991-11-27  |  4KB  |  78 lines
  1.      IFND      REXX_ERRORS_I
  2. REXX_ERRORS_I SET      1
  3. **
  4. **    $Filename: rexx/errors.i $
  5. **    $Release: 2.04 Includes, V37.4 $
  6. **    $Revision: 1.6 $
  7. **    $Date: 91/11/08 $
  8. **
  9. **    Definitions for ARexx error codes
  10. **
  11. **    (C) Copyright 1986,1987,1988,1989,1990 William S. Hawes.
  12. **    (C) Copyright 1990-1991 Commodore-Amiga, Inc.
  13. **        All Rights Reserved
  14. **
  15.  
  16. ERRC_MSG    EQU   0            ; error code offset
  17. ERR10_001   EQU   (ERRC_MSG+1)        ; program not found
  18. ERR10_002   EQU   (ERRC_MSG+2)        ; execution halted
  19. ERR10_003   EQU   (ERRC_MSG+3)        ; no memory available
  20.                     ; unassigned
  21. ERR10_005   EQU   (ERRC_MSG+5)        ; unmatched quote
  22. ERR10_006   EQU   (ERRC_MSG+6)        ; unterminated comment
  23.                     ; unassigned
  24. ERR10_008   EQU   (ERRC_MSG+8)        ; unrecognized token
  25. ERR10_009   EQU   (ERRC_MSG+9)        ; symbol or string too long
  26.  
  27. ERR10_010   EQU   (ERRC_MSG+10)     ; invalid message packet
  28. ERR10_011   EQU   (ERRC_MSG+11)     ; command string error
  29. ERR10_012   EQU   (ERRC_MSG+12)     ; error return from function
  30. ERR10_013   EQU   (ERRC_MSG+13)     ; host environment not found
  31. ERR10_014   EQU   (ERRC_MSG+14)     ; required library not available
  32. ERR10_015   EQU   (ERRC_MSG+15)     ; function not found
  33. ERR10_016   EQU   (ERRC_MSG+16)     ; function did not return value
  34. ERR10_017   EQU   (ERRC_MSG+17)     ; wrong number of arguments
  35. ERR10_018   EQU   (ERRC_MSG+18)     ; invalid argument to function
  36. ERR10_019   EQU   (ERRC_MSG+19)     ; invalid PROCEDURE instruction
  37.  
  38. ERR10_020   EQU   (ERRC_MSG+20)     ; unexpected THEN/ELSE
  39. ERR10_021   EQU   (ERRC_MSG+21)     ; unexpected WHEN/OTHERWISE
  40. ERR10_022   EQU   (ERRC_MSG+22)     ; unexpected BREAK, LEAVE or ITERATE
  41. ERR10_023   EQU   (ERRC_MSG+23)     ; invalid statement in SELECT
  42. ERR10_024   EQU   (ERRC_MSG+24)     ; missing or multiple THEN clauses
  43. ERR10_025   EQU   (ERRC_MSG+25)     ; missing OTHERWISE
  44. ERR10_026   EQU   (ERRC_MSG+26)     ; missing or unexpected END
  45. ERR10_027   EQU   (ERRC_MSG+27)     ; symbol mismatch on END/LEAVE/ITERATE
  46. ERR10_028   EQU   (ERRC_MSG+28)     ; invalid 'DO' syntax
  47. ERR10_029   EQU   (ERRC_MSG+29)     ; incomplete DO/IF/SELECT
  48.  
  49. ERR10_030   EQU   (ERRC_MSG+30)     ; label not found
  50. ERR10_031   EQU   (ERRC_MSG+31)     ; symbol expected
  51. ERR10_032   EQU   (ERRC_MSG+32)     ; string or symbol expected
  52. ERR10_033   EQU   (ERRC_MSG+33)     ; invalid sub-keyword
  53. ERR10_034   EQU   (ERRC_MSG+34)     ; required keyword missing
  54. ERR10_035   EQU   (ERRC_MSG+35)     ; extraneous characters in clause
  55. ERR10_036   EQU   (ERRC_MSG+36)     ; sub-keyword conflict
  56. ERR10_037   EQU   (ERRC_MSG+37)     ; invalid template
  57.                     ; unassigned
  58. ERR10_039   EQU   (ERRC_MSG+39)     ; uninitialized variable
  59.  
  60. ERR10_040   EQU   (ERRC_MSG+40)     ; invalid variable name
  61. ERR10_041   EQU   (ERRC_MSG+41)     ; invalid expression
  62. ERR10_042   EQU   (ERRC_MSG+42)     ; unbalanced parentheses
  63. ERR10_043   EQU   (ERRC_MSG+43)     ; nesting level exceeded
  64. ERR10_044   EQU   (ERRC_MSG+44)     ; invalid expression result
  65. ERR10_045   EQU   (ERRC_MSG+45)     ; expression required
  66. ERR10_046   EQU   (ERRC_MSG+46)     ; boolean value not 0 or 1
  67. ERR10_047   EQU   (ERRC_MSG+47)     ; arithmetic conversion error
  68. ERR10_048   EQU   (ERRC_MSG+48)     ; invalid operand
  69.  
  70. * Return Codes for general use ...
  71. RC_FAIL     EQU   -1            ; something's wrong
  72. RC_OK       EQU   0                 ; success
  73. RC_WARN     EQU   5                 ; A warning only
  74. RC_ERROR    EQU   10                ; Something wrong
  75. RC_FATAL    EQU   20                ; Complete or severe failure
  76.  
  77.          ENDC
  78.