diff --git a/compiler/owomflib.pas b/compiler/owomflib.pas
index 74b64912c5..7f8559e802 100644
--- a/compiler/owomflib.pas
+++ b/compiler/owomflib.pas
@@ -277,7 +277,7 @@ implementation
           if TryWriteDictionaryWithSize(nb) then
             exit(nb);
         { could not write dictionary, even with the largest number of blocks }
-        internalerror(2015042201);
+        internalerror(2015042202);
       end;
 
     function TOmfLibObjectWriter.TryWriteDictionaryWithSize(nblocks: Byte): Boolean;