Issue326.agda 238 B

123456789101112131415
  1. module Issue326 where
  2. open import Common.Prelude
  3. postulate
  4. QName : Set
  5. {-# BUILTIN QNAME QName #-}
  6. primitive primQNameEquality : QName → QName → Bool
  7. main : IO Unit
  8. main = printBool (primQNameEquality (quote Unit) (quote IO))