From 151787c7d37982e21eb9b79583108d8261766401 Mon Sep 17 00:00:00 2001
From: johnvg
Date: Fri, 2 Apr 2004 11:55:52 +0000
Subject: export strictness of argument of empty_cache

git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1482 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
---
 main/compile.dcl | 2 +-
 main/compile.icl | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

(limited to 'main')

diff --git a/main/compile.dcl b/main/compile.dcl
index 83ffb37..5e18ac8 100644
--- a/main/compile.dcl
+++ b/main/compile.dcl
@@ -21,4 +21,4 @@ compile :: ![{#Char}] !*DclCache !*Files -> (!Bool,!*DclCache,!*Files)
 	heaps::!.Heaps
  };
 
-empty_cache :: *SymbolTable -> *DclCache
+empty_cache :: !*SymbolTable -> *DclCache
diff --git a/main/compile.icl b/main/compile.icl
index b61146f..9fc53dc 100644
--- a/main/compile.icl
+++ b/main/compile.icl
@@ -115,7 +115,7 @@ InitialCoclOptions =
 	heaps::!.Heaps
  };
 
-empty_cache :: *SymbolTable -> *DclCache
+empty_cache :: !*SymbolTable -> *DclCache
 empty_cache symbol_heap
 	# heaps = {hp_var_heap = newHeap, hp_expression_heap = newHeap, hp_type_heaps = {th_vars = newHeap, th_attrs = newHeap}, hp_generic_heap = newHeap}
 	# (predef_symbols, hash_table) = buildPredefinedSymbols (newHashTable symbol_heap)
-- 
cgit v1.2.3