test/resources/testproject/testproject.dpr in rake-delphi-0.0.33 vs test/resources/testproject/testproject.dpr in rake-delphi-0.0.34

@@ -50,11 +50,20 @@
   end;
 end;
 
 var
   s: string;
+
+{$IFDEF TEST_BOOLEAN_EXPRESSIONS}
+function WriteIfFullBooleanExpressions(): Boolean;
 begin
+  s := s + '-=BOOLEAN EXPRESSION=-';
+  Result := False;
+end;
+{$ENDIF TEST_BOOLEAN_EXPRESSIONS}
+
+begin
   {$IFDEF DEBUG}
   Write('DEBUG: ');
   {$ENDIF}
   {$IFOPT D+}
   Write('D+: ');
@@ -82,7 +91,11 @@
       s := s + Format('-=%s#%s=-', [Host, Document]);
     finally
       Free;
     end;
   {$ENDIF}
+  {$IFDEF TEST_BOOLEAN_EXPRESSIONS}
+  if False and WriteIfFullBooleanExpressions() then
+    ;
+  {$ENDIF TEST_BOOLEAN_EXPRESSIONS}
   WriteLn('testproject works', s);
 end.