Emit "x" instead of " x" on "#error x".

jrsoftware · Jun 18, 2024 · a416853 · a416853
1 parent efee61b
commit a416853
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Projects/ISPP/IsppPreprocessor.pas b/Projects/ISPP/IsppPreprocessor.pas
@@ -1014,7 +1014,7 @@ function TPreprocessor.ProcessPreprocCommand(Command: TPreprocessorCommand;
         begin
           { Also see ErrorFunc in IsppFuncs }
           if Params = '' then Params := 'Error';
-          RaiseError(Params);
+          RaiseError(Params.Trim);
         end;
       pcPragma: Pragma(Parser);
       pcPrint: Params := ToStr(Evaluate).AsStr;