This doesn't compile with problems such as:
File "inspect_fs.ml", lines 258-308, characters 2-9:
258 | ..match distro with
259 | | None -> None
260 | | Some DISTRO_ALTLINUX
261 | | Some DISTRO_CENTOS
262 | | Some DISTRO_CIRCLE
...
305 | | Some DISTRO_SLACKWARE
306 | | Some DISTRO_TTYLINUX
307 | | Some DISTRO_WINDOWS ->
308 | None
Error (warning 8 [partial-match]): this pattern-matching is not exhaustive.
Here is an example of a case that is not matched:
Some DISTRO_OPENEULER
Rich.
--
Richard Jones, Virtualization Group, Red Hat
http://people.redhat.com/~rjones
Read my programming and virtualization blog:
http://rwmj.wordpress.com
nbdkit - Flexible, fast NBD server with plugins
https://gitlab.com/nbdkit/nbdkit