mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-05-30 14:22:38 +02:00
* setlength export declaration for 1.0.2 fixed
This commit is contained in:
parent
d592b8b678
commit
fc777c9970
@ -268,7 +268,7 @@ function strlen(p:pchar):longint;
|
||||
|
||||
{ Shortstring functions }
|
||||
{$ifdef ver1_0}
|
||||
Procedure SetLength (Var S : ShortString; l : Longint);
|
||||
Procedure SetLength (Var S : ShortString; l : TStrLenInt);
|
||||
{$endif ver1_0}
|
||||
Function Copy(const s:shortstring;index:StrLenInt;count:StrLenInt):shortstring;
|
||||
Procedure Delete(Var s:shortstring;index:StrLenInt;count:StrLenInt);
|
||||
@ -484,7 +484,10 @@ const
|
||||
|
||||
{
|
||||
$Log$
|
||||
Revision 1.6 2000-10-21 18:20:17 florian
|
||||
Revision 1.7 2000-10-23 14:00:59 florian
|
||||
* setlength export declaration for 1.0.2 fixed
|
||||
|
||||
Revision 1.6 2000/10/21 18:20:17 florian
|
||||
* a lot of small changes:
|
||||
- setlength is internal
|
||||
- win32 graph unit extended
|
||||
@ -502,4 +505,4 @@ const
|
||||
Revision 1.2 2000/07/13 11:33:45 michael
|
||||
+ removed logs
|
||||
|
||||
}
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user