summaryrefslogtreecommitdiff
path: root/ipl/mincl/evdefs.icn
diff options
context:
space:
mode:
Diffstat (limited to 'ipl/mincl/evdefs.icn')
-rw-r--r--ipl/mincl/evdefs.icn191
1 files changed, 0 insertions, 191 deletions
diff --git a/ipl/mincl/evdefs.icn b/ipl/mincl/evdefs.icn
deleted file mode 100644
index 4f76077..0000000
--- a/ipl/mincl/evdefs.icn
+++ /dev/null
@@ -1,191 +0,0 @@
-############################################################################
-#
-# File: evdefs.icn
-#
-# Subject: Definitions for event codes
-#
-# Author: Ralph E. Griswold
-#
-# Date: February 28, 1997
-#
-############################################################################
-#
-# This file is in the public domain.
-#
-############################################################################
-#
-# This file contains definitions for event codes.
-#
-# This file is intended for use with event monitors running under
-# MT Icon.
-#
-############################################################################
-#
-# This file is generated automatically from monitor.h.
-#
-############################################################################
-
-$define T_Coexpr 19
-$define T_Cset 5
-$define T_External 20
-$define T_File 6
-$define T_Integer 2
-$define T_Kywdevent 26
-$define T_Kywdint 21
-$define T_Kywdpos 22
-$define T_Kywdstr 25
-$define T_Kywdsubj 23
-$define T_Kywdwin 24
-$define T_Lelem 10
-$define T_List 9
-$define T_Lrgint 3
-$define T_Null 1
-$define T_Proc 7
-$define T_Real 4
-$define T_Record 8
-$define T_Refresh 18
-$define T_Selem 12
-$define T_Set 11
-$define T_Slots 16
-$define T_String 0
-$define T_Table 13
-$define T_Telem 14
-$define T_Tvsubs 17
-$define T_Tvtbl 15
-$define E_Aconv "\111" # Conversion attempt
-$define E_Alien "\172" # Alien allocation
-$define E_Assign "\347" # Assignment
-$define E_BlkDeAlc "\055" # Block deallocation
-$define E_Bsusp "\142" # Suspension from operation
-$define E_Coact "\101" # Co-expression activation
-$define E_Coexpr "\170" # Co-expression allocation
-$define E_Cofail "\104" # Co-expression failure
-$define E_Collect "\107" # Garbage collection
-$define E_Coret "\102" # Co-expression return
-$define E_Cset "\145" # Cset allocation
-$define E_Ecall "\143" # Call of operation
-$define E_Efail "\146" # Failure from expression
-$define E_EndCollect "\360" # End of garbage collection
-$define E_Erem "\166" # Removal of a suspended generator
-$define E_Eresum "\165" # Resumption of expression
-$define E_Error "\105" # Run-time error
-$define E_Esusp "\141" # Suspension from alternation
-$define E_Exit "\130" # Program exit
-$define E_External "\152" # External allocation
-$define E_Fcall "\072" # Function call
-$define E_Fconv "\112" # Conversion failure
-$define E_Ffail "\115" # Function failure
-$define E_File "\147" # File allocation
-$define E_Free "\132" # Free region
-$define E_Frem "\133" # Function suspension removal
-$define E_Fresum "\131" # Function resumption
-$define E_Fret "\120" # Function return
-$define E_Fsusp "\127" # Function suspension
-$define E_Intcall "\351" # interpreter call
-$define E_Integer "\100" # Integer value pseudo-event
-$define E_Intret "\352" # interpreter return
-$define E_Kywdint "\136" # Integer keyword value pseudo-event
-$define E_Kywdpos "\046" # Position value pseudo-event
-$define E_Kywdsubj "\052" # Subject value pseudo-event
-$define E_Lbang "\301" # List generation
-$define E_Lcreate "\302" # List creation
-$define E_Lelem "\155" # List element allocation
-$define E_Lget "\356" # List get/pop -- only E_Lget used
-$define E_Line "\355" # Line change
-$define E_List "\153" # List allocation
-$define E_Loc "\174" # Location change
-$define E_Lpop "\356" # List get/pop
-$define E_Lpull "\304" # List pull
-$define E_Lpush "\305" # List push
-$define E_Lput "\306" # List put
-$define E_Lrand "\307" # List random reference
-$define E_Lref "\310" # List reference
-$define E_Lrgint "\114" # Large integer allocation
-$define E_Lsub "\311" # List subscript
-$define E_Lsusp "\154" # Suspension from limitation
-$define E_MXevent "\370" # monitor input event
-$define E_Nconv "\116" # Conversion not needed
-$define E_Null "\044" # Null value pseudo-event
-$define E_Ocall "\134" # Operator call
-$define E_Ofail "\135" # Operator failure
-$define E_Opcode "\117" # Virtual-machine instruction
-$define E_Orem "\177" # Operator suspension removal
-$define E_Oresum "\175" # Operator resumption
-$define E_Oret "\140" # Operator return
-$define E_Osusp "\173" # Operator suspension
-$define E_Pcall "\103" # Procedure call
-$define E_Pfail "\106" # Procedure failure
-$define E_Prem "\126" # Suspended procedure removal
-$define E_Presum "\125" # Procedure resumption
-$define E_Pret "\122" # Procedure return
-$define E_Proc "\045" # Procedure value pseudo-event
-$define E_Psusp "\123" # Procedure suspension
-$define E_Rbang "\312" # Record generation
-$define E_Rcreate "\313" # Record creation
-$define E_Real "\144" # Real allocation
-$define E_Record "\150" # Record allocation
-$define E_Refresh "\171" # Refresh allocation
-$define E_Rrand "\314" # Record random reference
-$define E_Rref "\315" # Record reference
-$define E_Rsub "\316" # Record subscript
-$define E_Sbang "\317" # Set generation
-$define E_Sconv "\121" # Conversion success
-$define E_Screate "\320" # Set creation
-$define E_Sdelete "\321" # Set deletion
-$define E_Selem "\164" # Set element allocation
-$define E_Set "\161" # Set allocation
-$define E_Sfail "\341" # Scanning failure
-$define E_Sinsert "\322" # Set insertion
-$define E_Slots "\167" # Hash header allocation
-$define E_Smember "\323" # Set membership
-$define E_Snew "\340" # Scanning environment creation
-$define E_Spos "\346" # Scanning position
-$define E_Srand "\336" # Set random reference
-$define E_Srem "\344" # Scanning environment removal
-$define E_Sresum "\343" # Scanning resumption
-$define E_Ssasgn "\354" # Sub-string assignment
-$define E_Ssusp "\342" # Scanning suspension
-$define E_Stack "\353" # stack depth
-$define E_StrDeAlc "\176" # String deallocation
-$define E_String "\163" # String allocation
-$define E_Sval "\324" # Set value
-$define E_Table "\156" # Table allocation
-$define E_Tbang "\325" # Table generation
-$define E_Tconv "\113" # Conversion target
-$define E_Tcreate "\326" # Table creation
-$define E_Tdelete "\327" # Table deletion
-$define E_Telem "\157" # Table element allocation
-$define E_TenureBlock "\362" # Tenure a block region
-$define E_TenureString "\361" # Tenure a string region
-$define E_Tick "\056" # Clock tick
-$define E_Tinsert "\330" # Table insertion
-$define E_Tkey "\331" # Table key generation
-$define E_Tmember "\332" # Table membership
-$define E_Trand "\337" # Table random reference
-$define E_Tref "\333" # Table reference
-$define E_Tsub "\334" # Table subscript
-$define E_Tval "\335" # Table value
-$define E_Tvsubs "\151" # Substring tv allocation
-$define E_Tvtbl "\160" # Table-element tv allocation
-$define E_Value "\350" # Value assigned
-$define E_Disable 1000000
-$define E_Enable 1000001
-$define E_Quit 1000002
-$define E_ALoc 2000000
-$define E_Spoof 1728345
-$define AllocMask cset(E_List || E_Lelem || E_File || E_Lrgint || E_Real || E_Record || E_Selem || E_Set || E_Slots || E_Table || E_Telem || E_Tvsubs || E_Tvtbl || E_Cset || E_Refresh || E_String || E_Coexpr)
-$define AssignMask cset(E_Assign || E_Value)
-$define TypeMask AllocMask ++ (E_Integer || E_Null || E_Proc)
-$define ConvMask cset(E_Aconv || E_Tconv || E_Sconv || E_Nconv || E_Fconv)
-$define ProcMask cset(E_Pcall || E_Pfail || E_Pret || E_Psusp || E_Presum || E_Prem)
-$define FncMask cset(E_Fcall || E_Ffail || E_Fret || E_Fsusp || E_Fresum || E_Frem)
-$define OperMask cset(E_Ocall || E_Ofail || E_Oret || E_Osusp || E_Oresum || E_Orem)
-$define EvalMask (FncMask ++ ProcMask ++ OperMask)
-$define ListMask cset(E_Lbang || E_Lcreate || E_Lpop || E_Lpull || E_Lpush || E_Lput || E_Lrand || E_Lsub)
-$define RecordMask cset(E_Rbang || E_Rcreate || E_Rrand || E_Rsub)
-$define ScanMask cset(E_Snew || E_Sfail || E_Spos || E_Ssusp || E_Sresum || E_Srem)
-$define SetMask cset(E_Sbang || E_Screate || E_Sdelete || E_Sinsert || E_Smember || E_Sval)
-$define TableMask cset(E_Tbang || E_Tcreate || E_Tdelete || E_Tinsert || E_Tkey || E_Tmember || E_Trand || E_Tsub)
-$define StructMask ListMask ++ RecordMask ++ SetMask ++TableMask
-$define EmptyMask ''
-$define AllMask &cset