* Merging revisions 42280 from trunk:

    ------------------------------------------------------------------------
    r42280 | michael | 2019-06-24 12:42:37 +0200 (Mon, 24 Jun 2019) | 1 line
    
    * Fix Bug ID #35759
    ------------------------------------------------------------------------

git-svn-id: branches/fixes_3_2@42283 -

packages/fcl-db/src/dbase/dbf_prscore.pas

@@ -331,6 +331,7 @@ begin
     ExprTree := nil;
     ExpColl := TExprCollection.Create;
     try
+      FConstantsList.FreeAll; 
       //    FCurrentExpression := anExpression;
       ParseString(AnExpression, ExpColl);
       Check(ExpColl);