fpc/tests/webtbs/tw25610.pp
Jonas Maebe f936a48afa * don't change the forward/interface definition of regular forward/interface
functions whose implementation is declared "external". This results in less
    efficient code (all calls will go through a stub), but it prevents interface
    crc changes (-> no recompilations in case of circular dependencies) and it
    also keeps the interface stable (if the external implementation is changed
    afterwards to another external routine or to a local implementation, the
    mangled name of the routine does not change) (mantis #24121)

git-svn-id: trunk@27213 -
2014-03-20 21:03:07 +00:00

26 lines
376 B
ObjectPascal

{ %recompile=-drecompile}
{ %norun }
{ This file was automatically created by Lazarus. Do not edit!
This source is only used to compile and install the package.
}
unit tw25610;
interface
uses
uw25610a, uw25610b;
implementation
procedure Register;
var
arr: array of byte;
begin
setlength(arr,1);
DynArraySize(pointer(arr));
end;
end.