diff --git a/packages/fcl-passrc/src/pscanner.pp b/packages/fcl-passrc/src/pscanner.pp
index 9cdfd7a782..aad76842c1 100644
--- a/packages/fcl-passrc/src/pscanner.pp
+++ b/packages/fcl-passrc/src/pscanner.pp
@@ -3977,8 +3977,6 @@ begin
     MValue:=Param;
     MName:=UpperCase(Trim(Copy(MValue,1,Index-1)));
     Delete(MValue,1,Index+1);
-    if SameText(MName,'TGenericStringBuilder') then
-        Writeln('TGenericStringBuilder = ',MValue);
     AddMacro(MName,Trim(MValue));
     end;
 end;