Browse Source

* fix #0037235 high(empty open array )= -1

git-svn-id: trunk@45676 -
marco 5 years ago
parent
commit
b624b2a5f5
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/symbolic/src/symbolic.pas

+ 1 - 1
packages/symbolic/src/symbolic.pas

@@ -504,7 +504,7 @@ begin
        try
        try
          Eval:=TEvaluator.Create(Varname,Expr);
          Eval:=TEvaluator.Create(Varname,Expr);
          try 
          try 
-           if high(variablenames)>0 then
+           if high(variablenames)>=0 then
              begin
              begin
                for i:=low(variablenames) to high(variablenames) do
                for i:=low(variablenames) to high(variablenames) do
                  begin
                  begin