diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,3 +1,7 @@
+## 0.5.1
+
+- Exported all useful constructors and symbols.
+
 # 0.5
 
 #### Breaking changes
diff --git a/src/Codec/Wavefront.hs b/src/Codec/Wavefront.hs
--- a/src/Codec/Wavefront.hs
+++ b/src/Codec/Wavefront.hs
@@ -13,39 +13,21 @@
 
 module Codec.Wavefront (
     -- * Vertex location
-    Location
-  , locX
-  , locY
-  , locZ
-  , locW
+    Location(..)
     -- * Vertex texture coordinates
-  , TexCoord
-  , texcoordR
-  , texcoordS
-  , texcoordT
+  , TexCoord(..)
     -- * Vertex normals
-  , Normal
-  , norX
-  , norY
-  , norZ
+  , Normal(..)
     -- * Points
-  , Point
-  , pointLocIndex
+  , Point(..)
     -- * Lines
-  , Line
-  , lineLocIndex
-  , lineTexCoordIndex
+  , Line(..)
+  , LineIndex(..)
     -- * Faces
-  , Face
-  , faceLocIndex
-  , faceTexCoordIndex
-  , faceNorIndex
+  , Face(..)
+  , FaceIndex(..)
     -- * Element
-  , Element
-  , elObject
-  , elGroups
-  , elMtl
-  , elValue
+  , Element(..)
     -- * Object
   , WavefrontOBJ(..)
     -- * Re-exports
diff --git a/src/Codec/Wavefront/Token.hs b/src/Codec/Wavefront/Token.hs
--- a/src/Codec/Wavefront/Token.hs
+++ b/src/Codec/Wavefront/Token.hs
@@ -121,14 +121,14 @@
 lines :: Parser [Line]
 lines = do
     skipSpace
-    string "l "
+    _ <- string "l "
     skipHSpace
     pointIndices <- parsePointIndices
-    points <- case pointIndices of
+    pts <- case pointIndices of
       _:_:_ -> pure $ zipWith Line pointIndices (tail pointIndices)
       _ -> fail "line doesn't have at least two points"
     eol
-    pure points
+    pure pts
   where
     parsePointIndices = fmap (\(i,j) -> LineIndex i j) parseLinePair `sepBy1` skipHSpace
     parseLinePair = do
@@ -140,7 +140,7 @@
 face :: Parser Face
 face = do
     skipSpace
-    string "f "
+    _ <- string "f "
     skipHSpace
     faceIndices <- parseFaceIndices
     f <- case faceIndices of
diff --git a/wavefront.cabal b/wavefront.cabal
--- a/wavefront.cabal
+++ b/wavefront.cabal
@@ -1,5 +1,5 @@
 name:                wavefront
-version:             0.5
+version:             0.5.1
 synopsis:            Wavefront OBJ loader
 description:         A Wavefront OBJ loader. Currently supports polygonal information. More could
                      be added if needed (like curves and surface) if people contribute. Feel free
@@ -25,17 +25,17 @@
   ghc-options:         -W -Wall
 
   exposed-modules:     Codec.Wavefront
-                     , Codec.Wavefront.IO
-
-  other-modules:       Codec.Wavefront.Element
+                     , Codec.Wavefront.Element
                      , Codec.Wavefront.Face
-                     , Codec.Wavefront.Line
+                     , Codec.Wavefront.IO
                      , Codec.Wavefront.Location
+                     , Codec.Wavefront.Line
                      , Codec.Wavefront.Normal
                      , Codec.Wavefront.Object
                      , Codec.Wavefront.Point
                      , Codec.Wavefront.TexCoord
-                     , Codec.Wavefront.Token
+
+  other-modules:       Codec.Wavefront.Token
                      , Codec.Wavefront.Lexer
 
   default-extensions:  OverloadedStrings