diff options
| author | martijnv | 2001-03-26 07:51:11 +0000 |
|---|---|---|
| committer | martijnv | 2001-03-26 07:51:11 +0000 |
| commit | b34b8dd72da458f849ea90e8c1f04b6fd471b7e4 (patch) | |
| tree | 53b5db3804b4aaf12f1a3bbd7aba17944eabbf9d /frontend/checktypes.icl | |
| parent | small changes (diff) | |
bug fix in nf
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@340 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/checktypes.icl')
| -rw-r--r-- | frontend/checktypes.icl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/frontend/checktypes.icl b/frontend/checktypes.icl index 844a04a..932b01e 100644 --- a/frontend/checktypes.icl +++ b/frontend/checktypes.icl @@ -244,7 +244,7 @@ checkTypeDef /* TD */ is_dcl_module type_index module_index ts=:{ts_type_defs} t // in case of an icl-module, the arguments i.e. the type variables of type constructors are normalized which makes // comparison by the static linker easier. # (cs=:{cs_error}) - = { cs & cs_x = { cs.cs_x & x_is_dcl_module = is_dcl_module, x_type_var_position = 0 } } + = { cs & cs_x = { cs.cs_x & x_is_dcl_module = /*is_dcl_module*/ True, x_type_var_position = 0 } } // | FB (not is_dcl_module) ("checkTypeDef: " +++ td_name.id_name) True # // ... TD |