fortran-src-0.7.0: test/Language/Fortran/AST/BozSpec.hs

module Language.Fortran.AST.BozSpec where

import Test.Hspec

import Language.Fortran.AST.Boz

spec :: Spec
spec = do
  describe "BOZ literal constants" $ do
    it "parses a prefix and suffix BOZ constant identically" $ do
      parseBoz "z'123abc'" `shouldBe` parseBoz "'123abc'z"

    it "parses nonstandard X as Z (hex)" $ do
      parseBoz "x'09af'" `shouldBe` parseBoz "z'09af'"