2 % (c) The GRASP Project, Glasgow University, 1992
4 \section[TyProcessor]{The processor datatypes}
6 This is used only for ``Data Parallel Haskell.''
9 #include "HsVersions.h"
13 import PrelFuns -- help functions, types and things
16 import AbsUniType ( applyTyCon, mkProcessorTyCon )
19 mkProcessorTy :: [UniType] -> UniType -> UniType
21 = applyTyCon (mkProcessorTyCon (length tys)) (tys++[ty])
23 processor1TyCon = mkProcessorTyCon (1::Int)
24 processor2TyCon = mkProcessorTyCon (2::Int)
25 processor3TyCon = mkProcessorTyCon (3::Int)