inWord8 :: ArgIn Word8
inWord8 i               = writeVarWord (fromIntegral i)
inWord8 :: ArgIn Word8
inWord8 i               = writeVarWord (fromIntegral i)
inWord8 i               = writeVarWord (fromIntegral i)