diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,3 +1,11 @@
+## 0.1.0.3
+
+- Fixed alcOpenDevice.
+
+## 0.1.0.2
+
+- Default paths for Windows.
+
 ## 0.1.0.1
 
 - .cabal information added.
diff --git a/al.cabal b/al.cabal
--- a/al.cabal
+++ b/al.cabal
@@ -1,5 +1,5 @@
 name:                al
-version:             0.1.0.2
+version:             0.1.0.3
 synopsis:            OpenAL 1.1 raw API.
 description:         __OpenAL__ is a minimalistic sound API that aims to provide
                      bare features for /spacialized audio/. The API looks like
diff --git a/src/Sound/ALC/Device.chs b/src/Sound/ALC/Device.chs
--- a/src/Sound/ALC/Device.chs
+++ b/src/Sound/ALC/Device.chs
@@ -15,5 +15,5 @@
 import Sound.AL.Types
 import Sound.ALC.Types
 
-foreign import CALLCV "alcOpenDevice" alcOpenDevice :: ALubyte -> IO (Ptr ALCdevice)
+foreign import CALLCV "alcOpenDevice" alcOpenDevice :: Ptr ALubyte -> IO (Ptr ALCdevice)
 foreign import CALLCV "alcCloseDevice" alcCloseDevice :: Ptr ALCdevice -> IO ()