{-# LANGUAGE ImportQualifiedPost #-}

import Data.SpirV.Headers.Enum qualified as Enum

import Shower (printer)

main :: IO ()
main = Enum.decode "SPIRV-Headers/include/spirv/unified1/spirv.json" >>= either fail printer