Add Expression.compare for sorting expressions

OpenModelica · Jul 19, 2016 · 4877c8d · 4877c8d
1 parent 295b0a4
commit 4877c8d
Show file tree

Hide file tree

Showing 3 changed files with 312 additions and 294 deletions.
diff --git a/Compiler/FrontEnd/ComponentReference.mo b/Compiler/FrontEnd/ComponentReference.mo
@@ -785,6 +785,14 @@ algorithm
   greaterThan := CompareWithGenericSubscript.compare(cr1,cr2) > 0;
 end crefSortFunc;
 
+public function crefCompareGeneric "A sorting function for crefs"
+  input DAE.ComponentRef cr1;
+  input DAE.ComponentRef cr2;
+  output Integer comp;
+algorithm
+  comp := CompareWithGenericSubscript.compare(cr1,cr2);
+end crefCompareGeneric;
+
 public function crefLexicalGreaterSubsAtEnd
 "mahge:
   Compares two crefs lexically. Subscripts are treated as if they are