From 3531c24fd45db56e8b0eda99cfea051d4ffa258e Mon Sep 17 00:00:00 2001 From: Adrian Pop Date: Wed, 30 Oct 2013 19:30:06 +0000 Subject: [PATCH] - remove assignment to inputs git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@17938 f25d12d1-65f4-0310-ae8a-bbce733d8d8e --- Compiler/Util/BaseHashTable.mo | 27 ++++++++++++++++++--------- 1 file changed, 18 insertions(+), 9 deletions(-) diff --git a/Compiler/Util/BaseHashTable.mo b/Compiler/Util/BaseHashTable.mo index 0d80add371e..60c13987517 100644 --- a/Compiler/Util/BaseHashTable.mo +++ b/Compiler/Util/BaseHashTable.mo @@ -321,17 +321,26 @@ algorithm end delete; public function anyKeyInHashTable "Returns true if any of the keys are present in the hashtable. Stops and returns true upon first occurence" - input list keys; - input HashTable ht; + input list inKeys; + input HashTable inHt; output Boolean res; algorithm - res := matchcontinue(keys,ht) - local Key key; - case({},ht) then false; - case(key::keys,ht) equation - _ = get(key,ht); - then true; - case(_::keys,ht) then anyKeyInHashTable(keys,ht); + res := matchcontinue(inKeys,inHt) + local + Key key; + list keys; + + case({}, _) then false; + + case(key::keys, _) + equation + _ = get(key, inHt); + then + true; + + case(_::keys, _) + then anyKeyInHashTable(keys, inHt); + end matchcontinue; end anyKeyInHashTable;