fixed bug in varname generation

git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@1533 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
OpenModelica · Feb 23, 2005 · 6c90aad · 6c90aad
1 parent 30fa779
commit 6c90aad
Showing 1 changed file with 9 additions and 6 deletions.
diff --git a/modeq/simcodegen.rml b/modeq/simcodegen.rml
@@ -256,23 +256,26 @@ relation generate_var_names_algvars:(DAELow.Var list) => string list =
 				_,value,indx,origname,_)::vs)
 	=> origname'::res
 
-  rule	generate_var_names_algvars(vs) => res 
+  rule	generate_var_names_algvars(vs) => res &
+	Util.string_append_list(["\"",origname,"\""]) => origname'
 	-----------------------
 	generate_var_names_algvars(DAELow.VAR(cr,DAELow.DUMMY_DER,_,_,_,_,
 				_,value,indx,origname,_)::vs)
-	=> origname::res
+	=> origname'::res
 
-  rule	generate_var_names_algvars(vs) => res 
+  rule	generate_var_names_algvars(vs) => res &
+	Util.string_append_list(["\"",origname,"\""]) => origname'
 	-----------------------
 	generate_var_names_algvars(DAELow.VAR(cr,DAELow.DUMMY_STATE,_,_,_,_,
 				_,value,indx,origname,_)::vs)
-	=> origname::res
+	=> origname'::res
 
-  rule	generate_var_names_algvars(vs) => res 
+  rule	generate_var_names_algvars(vs) => res &
+	Util.string_append_list(["\"",origname,"\""]) => origname'
 	-----------------------
 	generate_var_names_algvars(DAELow.VAR(cr,DAELow.DISCRETE,_,_,_,_,
 				_,value,indx,origname,_)::vs)
-	=> origname::res
+	=> origname'::res
 
   rule	generate_var_names_algvars(vs) => res 
 	-----------------------