From 6c7cfd4481b097ccde7fe3691f32ecd6bbb2e679 Mon Sep 17 00:00:00 2001
From: martijnv
Date: Mon, 11 Mar 2002 10:06:05 +0000
Subject: - bug fix: added a forgotten alternative to function convertDynamics
 for   NoBind

git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1055 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
---
 frontend/convertDynamics.icl | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

(limited to 'frontend/convertDynamics.icl')

diff --git a/frontend/convertDynamics.icl b/frontend/convertDynamics.icl
index 49c2ccd..a20147e 100644
--- a/frontend/convertDynamics.icl
+++ b/frontend/convertDynamics.icl
@@ -301,9 +301,7 @@ where
 		  (tb_rhs, ci) = convertDynamics {global_type_instances & cinp_st_args = tb_args} vars_with_types No tb_rhs ci
 		= (TransformedBody {tb_args = tb_args,tb_rhs = tb_rhs}, ci)
 	convert_dynamics_in_body global_type_instances other fun_type ci
-		| True <<- ("Martijn",other)
-		= abort "!!!unexpected value in 'convert dynamics.convert_dynamics_in_body'"
-import RWSDebug
+		= abort "unexpected value in 'convert dynamics.convert_dynamics_in_body'"
 
 bindVarsToTypes2 st_context vars types typed_vars common_defs
 	:== bindVarsToTypes vars (addTypesOfDictionaries common_defs st_context types) typed_vars
-- 
cgit v1.2.3