Merge pull request #23 from djs55/master

Work around unknown 'unknown' shutdown reasons
Fix the fix for unknown 'unknown' shutdown reasons

It's the values from libxl which seem to be incorrect, not
the values from OCaml.

Signed-off-by: David Scott <dave.scott@eu.citrix.com>