From 2d7141eb1fbea5966a5033978ce9c9467fd90bde Mon Sep 17 00:00:00 2001
From: johnvg
Date: Fri, 31 Aug 2001 10:46:42 +0000
Subject: added symbol_heap parameter to newHashTable

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

(limited to 'frontend/hashtable.icl')

diff --git a/frontend/hashtable.icl b/frontend/hashtable.icl
index 1ca48b5..0f8cd27 100644
--- a/frontend/hashtable.icl
+++ b/frontend/hashtable.icl
@@ -24,8 +24,8 @@ import predef, syntax, StdCompare, compare_constructor
 
 :: BoxedIdent = {boxed_ident::!Ident}
 
-newHashTable :: *HashTable
-newHashTable = { hte_symbol_heap = newHeap, hte_entries = {  HTE_Empty \\ i <- [0 .. dec cHashTableSize] },hte_mark=0}
+newHashTable :: *SymbolTable -> *HashTable
+newHashTable symbol_heap = { hte_symbol_heap = symbol_heap, hte_entries = {  HTE_Empty \\ i <- [0 .. dec cHashTableSize] },hte_mark=0}
 
 set_hte_mark :: !Int !*HashTable -> *HashTable
 set_hte_mark hte_mark ht = {ht & hte_mark=hte_mark}
-- 
cgit v1.2.3