1{-# LANGUAGE NamedFieldPuns #-}
2module Main where
3main = putStr "foo"
4