Show
Ignore:
Timestamp:
03.01.2009 15:43:50 (15 months ago)
Author:
maeder
Message:

renamed funs in CASL to ops

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • trunk/CASL/AS_Basic_CASL.der.hs

    r11199 r11201  
    7373               deriving Show 
    7474 
    75 data FunKind = Total | Partial deriving (Show, Eq, Ord) 
    76  
    77 data OP_TYPE = Op_type FunKind [SORT] SORT Range 
     75data OpKind = Total | Partial deriving (Show, Eq, Ord) 
     76 
     77data OP_TYPE = Op_type OpKind [SORT] SORT Range 
    7878               -- pos: "*"s, "->" ; if null [SORT] then Range = [] or pos: "?" 
    7979               deriving (Show, Eq, Ord) 
     
    8585res_OP_TYPE (Op_type _ _ res _) = res 
    8686 
    87 data OP_HEAD = Op_head FunKind [ARG_DECL] SORT Range 
     87data OP_HEAD = Op_head OpKind [ARG_DECL] SORT Range 
    8888               -- pos: "(", semicolons, ")", colon 
    8989               deriving Show 
     
    115115                     deriving Show 
    116116 
    117 data ALTERNATIVE = Alt_construct FunKind OP_NAME [COMPONENTS] Range 
     117data ALTERNATIVE = Alt_construct OpKind OP_NAME [COMPONENTS] Range 
    118118                   -- pos: "(", semi colons, ")" optional "?" 
    119119                 | Subsorts [SORT] Range 
     
    121121                   deriving Show 
    122122 
    123 data COMPONENTS = Cons_select FunKind [OP_NAME] SORT Range 
     123data COMPONENTS = Cons_select OpKind [OP_NAME] SORT Range 
    124124                  -- pos: commas, colon or ":?" 
    125125                | Sort SORT