* pass on the "eval" state (whether or not subexpressions should be evaluated)

    when encountering a "(" in a preprocessor expression (broken after r25465,
    mantis #25296)

git-svn-id: trunk@26615 -

compiler/scanner.pas

@@ -1923,7 +1923,7 @@ type
            else if current_scanner.preproc_token =_LKLAMMER then
              begin
                 preproc_consume(_LKLAMMER);
-                result:=preproc_sub_expr(opcompare,true);
+                result:=preproc_sub_expr(opcompare,eval);
                 preproc_consume(_RKLAMMER);
              end
            else if current_scanner.preproc_token = _LECKKLAMMER then