From 2f584302ec09b49654477da222e3ee55e43d70c4 Mon Sep 17 00:00:00 2001 From: diederik Date: Wed, 4 Sep 2002 09:14:23 +0000 Subject: Add SK_GeneratedCaseFunction for dynamic cases fix git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1196 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d --- backend/backendconvert.icl | 2 ++ 1 file changed, 2 insertions(+) (limited to 'backend') diff --git a/backend/backendconvert.icl b/backend/backendconvert.icl index a196f12..bc52e39 100644 --- a/backend/backendconvert.icl +++ b/backend/backendconvert.icl @@ -1828,6 +1828,8 @@ where = beFunctionSymbol glob_object main_dcl_module_n convertSymbol {symb_kind=SK_GeneratedFunction _ index} = beFunctionSymbol index main_dcl_module_n + convertSymbol {symb_kind=SK_GeneratedCaseFunction _ index} + = beFunctionSymbol index main_dcl_module_n convertSymbol {symb_kind=SK_Constructor {glob_module, glob_object}} = beConstructorSymbol glob_module glob_object // ->> ("convertSymbol", (glob_module, glob_object)) convertSymbol symbol -- cgit v1.2.3