17 "hdr == fst"
18
19 msg :: "'msg packet => 'msg"
20 "msg == snd"
21
22 ML {* use_legacy_bindings (the_context ()) *}
23
24 end
22 end