diff --git a/rtl/objpas/sysconst.pp b/rtl/objpas/sysconst.pp index 9295e64d9e..1cba7bcb47 100644 --- a/rtl/objpas/sysconst.pp +++ b/rtl/objpas/sysconst.pp @@ -213,20 +213,19 @@ begin end; If length(Result)=0 then -{$ifdef VER1_0} begin Str(Errno:3,Result); Result:=SUnknown+Result; end; -{$else} - Result:=SUnknown+Str(Errno:3); -{$endif} end; end. { $Log$ - Revision 1.15 2005-02-14 17:13:31 peter + Revision 1.16 2005-03-17 16:29:04 peter + * fixed str() call + + Revision 1.15 2005/02/14 17:13:31 peter * truncate log Revision 1.14 2005/01/14 12:59:25 michael