From dc58777cf7307cb36b93d708faff6d2346715ec7 Mon Sep 17 00:00:00 2001
From: ronny
Date: Fri, 20 Sep 2002 10:05:15 +0000
Subject: removed unnecessary exports

git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1203 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
---
 frontend/convertcases.icl | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'frontend/convertcases.icl')

diff --git a/frontend/convertcases.icl b/frontend/convertcases.icl
index c692a4d..775ea55 100644
--- a/frontend/convertcases.icl
+++ b/frontend/convertcases.icl
@@ -1729,6 +1729,11 @@ splitGuards (BasicPatterns basicType patterns)
 splitGuards (OverloadedListPatterns type decons_expr patterns)
 	=	[OverloadedListPatterns type decons_expr [pattern] \\ pattern <- patterns]
 
+::	TypedVariable =
+	{	tv_free_var	:: !FreeVar
+	,	tv_type		:: !AType
+	}
+
 copyExpression :: ![TypedVariable] !Expression !*VarHeap -> (![Expression], ![TypedVariable], ![FreeVar], !Expression, !*VarHeap)
 copyExpression bound_vars expr var_heap
     # var_heap = foldSt (\{tv_free_var={fv_info_ptr},tv_type} -> writePtr fv_info_ptr (VI_BoundVar tv_type)) bound_vars var_heap
-- 
cgit v1.2.3