modification of form_lp.adb for a compiler warning