diff --git a/sdl2-sprite.cabal b/sdl2-sprite.cabal
--- a/sdl2-sprite.cabal
+++ b/sdl2-sprite.cabal
@@ -1,5 +1,5 @@
 name:                sdl2-sprite
-version:             0.0.0
+version:             0.0.1
 synopsis:            Sprite previewer/animator
 description:         View your sprites in an animated way with SDL2
 homepage:            https://github.com/chrisdone/sdl2-sprite#readme
@@ -15,7 +15,7 @@
 
 library
   hs-source-dirs:      src
-  ghc-options:         -Wall
+  ghc-options:         -Wall -O2
   exposed-modules:     SDL.Sprite
   build-depends:       base >= 4.7 && < 5,
                        sdl2
@@ -25,7 +25,7 @@
 executable sdl2-sprite
   hs-source-dirs:      app
   main-is:             Main.hs
-  ghc-options:         -Wall -threaded -rtsopts -with-rtsopts=-N
+  ghc-options:         -Wall -threaded -rtsopts -with-rtsopts=-N -O2
   build-depends:       base
                      , sdl2-sprite
                      , sdl2
diff --git a/src/SDL/Sprite.hs b/src/SDL/Sprite.hs
--- a/src/SDL/Sprite.hs
+++ b/src/SDL/Sprite.hs
@@ -60,6 +60,7 @@
   }
   where
     (V2 w _) = spriteDimensions s
+{-# INLINE animate #-}
 
 -- | Render the sprite at the given coordinates.
 render :: MonadIO m => Sprite -> V2 CInt -> m ()
@@ -69,3 +70,4 @@
     (spriteTexture s)
     (Just (spriteRectangle s))
     (Just (Rectangle (P xy) (spriteDimensions s)))
+{-# INLINE render #-}