val fundecl : Mach.fundecl -> Linear.fundecl