let parse_request_stanza par =
{
request = parse_s ~err:"(Empty REQUEST)" parse_string "Request" par;
install = parse_s ~opt:[] parse_req "Install" par;
remove = parse_s ~opt:[] parse_req "Remove" par;
upgrade = parse_s ~opt:false Packages.parse_bool "Upgrade" par;
distupgrade = parse_s ~opt:false Packages.parse_bool "Dist-Upgrade" par;
autoremove = parse_s ~opt:false Packages.parse_bool "Autoremove" par;
strict_pin = parse_s ~opt:true Packages.parse_bool "Strict-Pinning" par;
preferences = parse_s ~opt:"" Packages.parse_string "Preferences" par;
}