diff options
author | ronny | 2002-09-20 08:40:45 +0000 |
---|---|---|
committer | ronny | 2002-09-20 08:40:45 +0000 |
commit | 97560231e2b243d0dd3cac4b689c8cf37eaa192f (patch) | |
tree | 168bca9727288fc90dda4baac8e9159a1098d24a /frontend/frontend.icl | |
parent | bug fixed: check if overloading is solved in type codes, removed some unused ... (diff) |
switch to 2.0 syntax, remove duplicated definitions from icl modules
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1200 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/frontend.icl')
-rw-r--r-- | frontend/frontend.icl | 27 |
1 files changed, 0 insertions, 27 deletions
diff --git a/frontend/frontend.icl b/frontend/frontend.icl index 9ecb140..66c1e6e 100644 --- a/frontend/frontend.icl +++ b/frontend/frontend.icl @@ -8,32 +8,11 @@ import scanner, parse, postparse, check, type, trans, convertcases, overloading, //import print -:: FrontEndOptions - = { feo_up_to_phase :: !FrontEndPhase - , feo_generics :: !Bool - , feo_fusion :: !Bool - } - -:: FrontEndSyntaxTree - = { fe_icl :: !IclModule - , fe_dcls :: !{#DclModule} - , fe_components :: !{!Group} - , fe_arrayInstances :: !ArrayAndListInstances - } - // trace macro (-*->) infixl (-*->) value trace :== value // ---> trace -:: FrontEndPhase - = FrontEndPhaseCheck - | FrontEndPhaseTypeCheck - | FrontEndPhaseConvertDynamics - | FrontEndPhaseTransformGroups - | FrontEndPhaseConvertModules - | FrontEndPhaseAll - instance == FrontEndPhase where (==) a b = equal_constructor a b @@ -409,12 +388,6 @@ where show_dcl_function {ft_symb, ft_type} file = file <<< ft_symb <<< " :: " <<< ft_type <<< "\n" - -:: ListTypesKind = ListTypesNone | ListTypesInferred | ListTypesStrictExports | ListTypesAll -:: ListTypesOption = - { lto_showAttributes :: Bool - , lto_listTypesKind :: ListTypesKind - } instance == ListTypesKind where (==) ListTypesNone ListTypesNone = True |