{-# LANGUAGE PackageImports #-}
module Main where
import "harfbuzz-pure" Data.Text.Glyphize
import "harfbuzz-pure" Data.Text.Glyphize.Buffer
main :: IO ()
main = do
buf' <- freeze' defaultBuffer
buf <- thaw' buf'
print buf
-- TODO test I can shape text!