I have to define a weak procedure in implementation of a unit to make the linker happy in a special case:

procedure vPortFree; external name 'vPortFree';

procedure vPortFreeStub; assembler; nostackframe;
asm
  .long vPortFree
  .weak vPortFree
  .set  vPortFree,vPortFreeStub
  bkpt
end;

is there a more elegant way to do this? My target is arm-freertos. The function is actually never called, this is why it consists of a bkpt.


Michael





_______________________________________________
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel

Reply via email to