unit uinline4b; interface uses uinline4a; var libbase : aptrtype; implementation end.