unit unit_order_a; {$mode objfpc}{$H+} interface var v: char; implementation end.