SymbItems.hs revision 9d0567bda351efa4286f38e85fb3e41ecd3683ea
2b873214c9ab511bbca437c036371ab664aedaceChristian Maeder{- |
f66fcd981f556c238df7dd6dfa42123745e3b1d2Christian MaederModule : $Header$
c63ebf815c8a874525cf18670ad74847f7fc7b26Christian MaederDescription : syntactic csp-casl symbols
c092fcac4b8f5c524c22ca579189c4487c13edf7Christian MaederCopyright : (c) Christian Maeder, DFKI GmbH 2011
54ed6a6b1a6c7d27fadb39ec5b59d0806c81f7c8Christian MaederLicense : GPLv2 or higher, see LICENSE.txt
75a6279dbae159d018ef812185416cf6df386c10Till MossakowskiMaintainer : Christian.Maeder@dfki.de
3f69b6948966979163bdfe8331c38833d5d90ecdChristian MaederStability : provisional
75a6279dbae159d018ef812185416cf6df386c10Till MossakowskiPortability : portable
75a6279dbae159d018ef812185416cf6df386c10Till Mossakowski
f66fcd981f556c238df7dd6dfa42123745e3b1d2Christian Maeder-}
c092fcac4b8f5c524c22ca579189c4487c13edf7Christian Maeder
dda5ab793f1615c1ba1dcaa97a4346b0878da6b1Christian Maedermodule CspCASL.SymbItems where
f66fcd981f556c238df7dd6dfa42123745e3b1d2Christian Maeder
f66fcd981f556c238df7dd6dfa42123745e3b1d2Christian Maederimport CspCASL.AS_CspCASL_Process
da955132262baab309a50fdffe228c9efe68251dCui Jian
dda5ab793f1615c1ba1dcaa97a4346b0878da6b1Christian Maederimport CASL.AS_Basic_CASL
dda5ab793f1615c1ba1dcaa97a4346b0878da6b1Christian Maeder
f66fcd981f556c238df7dd6dfa42123745e3b1d2Christian Maederimport Common.Id
f66fcd981f556c238df7dd6dfa42123745e3b1d2Christian Maeder
0799b5dc3f06d2640e66e9ab54b8b217348fd719Christian Maederdata SymbItems = SymbItems SymbKind [Symb] deriving (Show, Eq)
0799b5dc3f06d2640e66e9ab54b8b217348fd719Christian Maeder
43b4c41fbb07705c9df321221ab9cb9832460407Christian Maederdata SymbMapItems = SymbMapItems SymbKind [SymbMap] deriving (Show, Eq)
4c8d3c5a9e938633f6147b5a595b9b93bfca99e6Christian Maeder
fbc4f8708092d571a45cb483f37cc6b674da45a7Christian Maederdata SymbKind = CaslKind SYMB_KIND | ProcessKind | ChannelKind
fbc4f8708092d571a45cb483f37cc6b674da45a7Christian Maeder deriving (Show, Eq, Ord)
fbc4f8708092d571a45cb483f37cc6b674da45a7Christian Maeder
b10d6cef708b7a659f2d3b367e8e0db0d03ae3f5Till Mossakowskidata Symb = Symb Id (Maybe CspType)
c4451dc7da4a15726ba96179aecf046a5df5cae1Christian Maeder deriving (Show, Eq)
3c4e64e0b4361a24275ee8f308fa965ab1e52f2eHeng Jiang
fa388aea9cef5f9734fec346159899a74432ce26Christian Maeder-- for channels with sorts we may re-use A_type that is ambiguous
0799b5dc3f06d2640e66e9ab54b8b217348fd719Christian Maederdata CspType = CaslType TYPE | ProcType ProcProfile deriving (Show, Eq)
f77f29e84b3f6e791c82e61b13fbf76582bedd2fChristian Maeder
dda5ab793f1615c1ba1dcaa97a4346b0878da6b1Christian Maederdata SymbMap = SymbMap Symb (Maybe Symb) deriving (Show, Eq)
d56ece59c372cb887355825901222b9f3377f7e6Thiemo Wiedemeyer