SDLRuby 0.3.0 → 0.4.0

data/lib/SDLRuby/mixer/include/SDL_mixer.h.rb

@@ -1,95 +1,95 @@
-module SDLRuby::Mixer
-  typealias "Mix_Music", "struct _Mix_Music"
-  typealias "MIX_InitFlags", "int"
-  typealias "Mix_Fading", "int"
-  typealias "Mix_MusicType", "int"
-  extern "const SDL_version * Mix_Linked_Version(void)"
-  extern "int Mix_Init(int flags)"
-  extern "void Mix_Quit(void)"
-  extern "int Mix_OpenAudio(int frequency, Uint16 format, int channels, int chunksize)"
-  extern "int Mix_OpenAudioDevice(int frequency, Uint16 format, int channels, int chunksize, const char*device, int allowed_changes)"
-  extern "int Mix_QuerySpec(int *frequency, Uint16 *format, int *channels)"
-  extern "int Mix_AllocateChannels(int numchans)"
-  extern "Mix_Chunk * Mix_LoadWAV_RW(SDL_RWops *src, int freesrc)"
-  extern "Mix_Chunk * Mix_LoadWAV(const char *file)"
-  extern "Mix_Music * Mix_LoadMUS(const char *file)"
-  extern "Mix_Music * Mix_LoadMUS_RW(SDL_RWops *src, int freesrc)"
-  extern "Mix_Music * Mix_LoadMUSType_RW(SDL_RWops *src, Mix_MusicType type, int freesrc)"
-  extern "Mix_Chunk * Mix_QuickLoad_WAV(Uint8 *mem)"
-  extern "Mix_Chunk * Mix_QuickLoad_RAW(Uint8 *mem, Uint32 len)"
-  extern "void Mix_FreeChunk(Mix_Chunk *chunk)"
-  extern "void Mix_FreeMusic(Mix_Music *music)"
-  extern "int Mix_GetNumChunkDecoders(void)"
-  extern "const char * Mix_GetChunkDecoder(int index)"
-  extern "SDL_bool Mix_HasChunkDecoder(const char *name)"
-  extern "int Mix_GetNumMusicDecoders(void)"
-  extern "const char * Mix_GetMusicDecoder(int index)"
-  extern "SDL_bool Mix_HasMusicDecoder(const char *name)"
-  extern "Mix_MusicType Mix_GetMusicType(const Mix_Music *music)"
-  extern "const char * Mix_GetMusicTitle(const Mix_Music *music)"
-  extern "const char * Mix_GetMusicTitleTag(const Mix_Music *music)"
-  extern "const char * Mix_GetMusicArtistTag(const Mix_Music *music)"
-  extern "const char * Mix_GetMusicAlbumTag(const Mix_Music *music)"
-  extern "const char * Mix_GetMusicCopyrightTag(const Mix_Music *music)"
-  extern "void * Mix_GetMusicHookData(void)"
-  extern "int Mix_RegisterEffect(int chan, Mix_EffectFunc_t f, Mix_EffectDone_t d, void *arg)"
-  extern "int Mix_UnregisterEffect(int channel, Mix_EffectFunc_t f)"
-  extern "int Mix_UnregisterAllEffects(int channel)"
-  extern "int Mix_SetPanning(int channel, Uint8 left, Uint8 right)"
-  extern "int Mix_SetPosition(int channel, Sint16 angle, Uint8 distance)"
-  extern "int Mix_SetDistance(int channel, Uint8 distance)"
-  extern "int Mix_SetReverseStereo(int channel, int flip)"
-  extern "int Mix_ReserveChannels(int num)"
-  extern "int Mix_GroupChannel(int which, int tag)"
-  extern "int Mix_GroupChannels(int from, int to, int tag)"
-  extern "int Mix_GroupAvailable(int tag)"
-  extern "int Mix_GroupCount(int tag)"
-  extern "int Mix_GroupOldest(int tag)"
-  extern "int Mix_GroupNewer(int tag)"
-  extern "int Mix_PlayChannel(int channel, Mix_Chunk *chunk, int loops)"
-  extern "int Mix_PlayChannelTimed(int channel, Mix_Chunk *chunk, int loops, int ticks)"
-  extern "int Mix_PlayMusic(Mix_Music *music, int loops)"
-  extern "int Mix_FadeInMusic(Mix_Music *music, int loops, int ms)"
-  extern "int Mix_FadeInMusicPos(Mix_Music *music, int loops, int ms, double position)"
-  extern "int Mix_FadeInChannel(int channel, Mix_Chunk *chunk, int loops, int ms)"
-  extern "int Mix_FadeInChannelTimed(int channel, Mix_Chunk *chunk, int loops, int ms, int ticks)"
-  extern "int Mix_Volume(int channel, int volume)"
-  extern "int Mix_VolumeChunk(Mix_Chunk *chunk, int volume)"
-  extern "int Mix_VolumeMusic(int volume)"
-  extern "int Mix_GetMusicVolume(Mix_Music *music)"
-  extern "int Mix_MasterVolume(int volume)"
-  extern "int Mix_HaltChannel(int channel)"
-  extern "int Mix_HaltGroup(int tag)"
-  extern "int Mix_HaltMusic(void)"
-  extern "int Mix_ExpireChannel(int channel, int ticks)"
-  extern "int Mix_FadeOutChannel(int which, int ms)"
-  extern "int Mix_FadeOutGroup(int tag, int ms)"
-  extern "int Mix_FadeOutMusic(int ms)"
-  extern "Mix_Fading Mix_FadingMusic(void)"
-  extern "Mix_Fading Mix_FadingChannel(int which)"
-  extern "void Mix_Pause(int channel)"
-  extern "void Mix_Resume(int channel)"
-  extern "int Mix_Paused(int channel)"
-  extern "void Mix_PauseMusic(void)"
-  extern "void Mix_ResumeMusic(void)"
-  extern "void Mix_RewindMusic(void)"
-  extern "int Mix_PausedMusic(void)"
-  extern "int Mix_ModMusicJumpToOrder(int order)"
-  extern "int Mix_SetMusicPosition(double position)"
-  extern "double Mix_GetMusicPosition(Mix_Music *music)"
-  extern "double Mix_MusicDuration(Mix_Music *music)"
-  extern "double Mix_GetMusicLoopStartTime(Mix_Music *music)"
-  extern "double Mix_GetMusicLoopEndTime(Mix_Music *music)"
-  extern "double Mix_GetMusicLoopLengthTime(Mix_Music *music)"
-  extern "int Mix_Playing(int channel)"
-  extern "int Mix_PlayingMusic(void)"
-  extern "int Mix_SetMusicCMD(const char *command)"
-  extern "int Mix_SetSynchroValue(int value)"
-  extern "int Mix_GetSynchroValue(void)"
-  extern "int Mix_SetSoundFonts(const char *paths)"
-  extern "const char* Mix_GetSoundFonts(void)"
-  extern "int Mix_SetTimidityCfg(const char *path)"
-  extern "const char* Mix_GetTimidityCfg(void)"
-  extern "Mix_Chunk * Mix_GetChunk(int channel)"
-  extern "void Mix_CloseAudio(void)"
-end
+module SDLRuby::Mixer
+  typealias "Mix_Music", "struct _Mix_Music"
+  typealias "MIX_InitFlags", "int"
+  typealias "Mix_Fading", "int"
+  typealias "Mix_MusicType", "int"
+  extern "const SDL_version * Mix_Linked_Version(void)"
+  extern "int Mix_Init(int flags)"
+  extern "void Mix_Quit(void)"
+  extern "int Mix_OpenAudio(int frequency, Uint16 format, int channels, int chunksize)"
+  extern "int Mix_OpenAudioDevice(int frequency, Uint16 format, int channels, int chunksize, const char*device, int allowed_changes)"
+  extern "int Mix_QuerySpec(int *frequency, Uint16 *format, int *channels)"
+  extern "int Mix_AllocateChannels(int numchans)"
+  extern "Mix_Chunk * Mix_LoadWAV_RW(SDL_RWops *src, int freesrc)"
+  extern "Mix_Chunk * Mix_LoadWAV(const char *file)"
+  extern "Mix_Music * Mix_LoadMUS(const char *file)"
+  extern "Mix_Music * Mix_LoadMUS_RW(SDL_RWops *src, int freesrc)"
+  extern "Mix_Music * Mix_LoadMUSType_RW(SDL_RWops *src, Mix_MusicType type, int freesrc)"
+  extern "Mix_Chunk * Mix_QuickLoad_WAV(Uint8 *mem)"
+  extern "Mix_Chunk * Mix_QuickLoad_RAW(Uint8 *mem, Uint32 len)"
+  extern "void Mix_FreeChunk(Mix_Chunk *chunk)"
+  extern "void Mix_FreeMusic(Mix_Music *music)"
+  extern "int Mix_GetNumChunkDecoders(void)"
+  extern "const char * Mix_GetChunkDecoder(int index)"
+  extern "SDL_bool Mix_HasChunkDecoder(const char *name)"
+  extern "int Mix_GetNumMusicDecoders(void)"
+  extern "const char * Mix_GetMusicDecoder(int index)"
+  extern "SDL_bool Mix_HasMusicDecoder(const char *name)"
+  extern "Mix_MusicType Mix_GetMusicType(const Mix_Music *music)"
+  extern "const char * Mix_GetMusicTitle(const Mix_Music *music)"
+  extern "const char * Mix_GetMusicTitleTag(const Mix_Music *music)"
+  extern "const char * Mix_GetMusicArtistTag(const Mix_Music *music)"
+  extern "const char * Mix_GetMusicAlbumTag(const Mix_Music *music)"
+  extern "const char * Mix_GetMusicCopyrightTag(const Mix_Music *music)"
+  extern "void * Mix_GetMusicHookData(void)"
+  extern "int Mix_RegisterEffect(int chan, Mix_EffectFunc_t f, Mix_EffectDone_t d, void *arg)"
+  extern "int Mix_UnregisterEffect(int channel, Mix_EffectFunc_t f)"
+  extern "int Mix_UnregisterAllEffects(int channel)"
+  extern "int Mix_SetPanning(int channel, Uint8 left, Uint8 right)"
+  extern "int Mix_SetPosition(int channel, Sint16 angle, Uint8 distance)"
+  extern "int Mix_SetDistance(int channel, Uint8 distance)"
+  extern "int Mix_SetReverseStereo(int channel, int flip)"
+  extern "int Mix_ReserveChannels(int num)"
+  extern "int Mix_GroupChannel(int which, int tag)"
+  extern "int Mix_GroupChannels(int from, int to, int tag)"
+  extern "int Mix_GroupAvailable(int tag)"
+  extern "int Mix_GroupCount(int tag)"
+  extern "int Mix_GroupOldest(int tag)"
+  extern "int Mix_GroupNewer(int tag)"
+  extern "int Mix_PlayChannel(int channel, Mix_Chunk *chunk, int loops)"
+  extern "int Mix_PlayChannelTimed(int channel, Mix_Chunk *chunk, int loops, int ticks)"
+  extern "int Mix_PlayMusic(Mix_Music *music, int loops)"
+  extern "int Mix_FadeInMusic(Mix_Music *music, int loops, int ms)"
+  extern "int Mix_FadeInMusicPos(Mix_Music *music, int loops, int ms, double position)"
+  extern "int Mix_FadeInChannel(int channel, Mix_Chunk *chunk, int loops, int ms)"
+  extern "int Mix_FadeInChannelTimed(int channel, Mix_Chunk *chunk, int loops, int ms, int ticks)"
+  extern "int Mix_Volume(int channel, int volume)"
+  extern "int Mix_VolumeChunk(Mix_Chunk *chunk, int volume)"
+  extern "int Mix_VolumeMusic(int volume)"
+  extern "int Mix_GetMusicVolume(Mix_Music *music)"
+  extern "int Mix_MasterVolume(int volume)"
+  extern "int Mix_HaltChannel(int channel)"
+  extern "int Mix_HaltGroup(int tag)"
+  extern "int Mix_HaltMusic(void)"
+  extern "int Mix_ExpireChannel(int channel, int ticks)"
+  extern "int Mix_FadeOutChannel(int which, int ms)"
+  extern "int Mix_FadeOutGroup(int tag, int ms)"
+  extern "int Mix_FadeOutMusic(int ms)"
+  extern "Mix_Fading Mix_FadingMusic(void)"
+  extern "Mix_Fading Mix_FadingChannel(int which)"
+  extern "void Mix_Pause(int channel)"
+  extern "void Mix_Resume(int channel)"
+  extern "int Mix_Paused(int channel)"
+  extern "void Mix_PauseMusic(void)"
+  extern "void Mix_ResumeMusic(void)"
+  extern "void Mix_RewindMusic(void)"
+  extern "int Mix_PausedMusic(void)"
+  extern "int Mix_ModMusicJumpToOrder(int order)"
+  extern "int Mix_SetMusicPosition(double position)"
+  extern "double Mix_GetMusicPosition(Mix_Music *music)"
+  extern "double Mix_MusicDuration(Mix_Music *music)"
+  extern "double Mix_GetMusicLoopStartTime(Mix_Music *music)"
+  extern "double Mix_GetMusicLoopEndTime(Mix_Music *music)"
+  extern "double Mix_GetMusicLoopLengthTime(Mix_Music *music)"
+  extern "int Mix_Playing(int channel)"
+  extern "int Mix_PlayingMusic(void)"
+  extern "int Mix_SetMusicCMD(const char *command)"
+  extern "int Mix_SetSynchroValue(int value)"
+  extern "int Mix_GetSynchroValue(void)"
+  extern "int Mix_SetSoundFonts(const char *paths)"
+  extern "const char* Mix_GetSoundFonts(void)"
+  extern "int Mix_SetTimidityCfg(const char *path)"
+  extern "const char* Mix_GetTimidityCfg(void)"
+  extern "Mix_Chunk * Mix_GetChunk(int channel)"
+  extern "void Mix_CloseAudio(void)"
+end

data/lib/SDLRuby/rw/operational.rb

@@ -0,0 +1,116 @@
+module SDLRuby
+  class RW
+    module Operational
+      def close
+        unless closed?
+          err = SDL.SDL_RWclose(to_ptr)
+
+          raise SDLError if err < 0
+        end
+      end
+
+      def closed? = to_ptr.freed?
+
+      def eof?
+        raise SDLError, "closed and freed rw" if closed?
+
+        s = SDL.SDL_RWsize(to_ptr)
+        raise SDLError if s < 0
+
+        t = SDL.SDL_RWtell(to_ptr)
+        raise SDLError if t < 0
+
+        s == t
+      end
+
+      def read(length = nil, buffer = nil)
+        raise SDLError, "closed and freed rw" if closed?
+
+        if length.nil?
+          len = size - tell
+        else
+          len = Integer.try_convert(length)
+          if len.nil?
+            raise TypeError,
+                  "no implicit conversion of #{length.class} into Integer"
+          end
+        end
+
+        if len < 0
+          raise ArgumentError, "negative length #{len} given"
+        end
+
+        if buffer.nil?
+          buffer = ""
+        else
+          buffer = String.try_convert(buffer)
+          if buffer.nil?
+            raise TypeError,
+                  "no implicit conversion of #{buffer.class} into String"
+          end
+        end
+
+        if eof? || len == 0
+          buffer.clear
+          return len == 0 ? buffer : nil
+        end
+
+        bytesize = buffer.bytesize
+        if len == bytesize
+          buffer
+        elsif len > bytesize
+          buffer.gsub!(/\z/nm, "\x00" * (len - bytesize))
+        elsif len < bytesize
+          buffer.gsub!(/[\x00-\xFF]{#{bytesize - len}}\z/nm, "")
+        end
+
+        n = SDL.SDL_RWread(to_ptr, buffer, 1, len)
+        if n < len
+          buffer.gsub!(/[\x00-\xFF]{#{n}}$/nm, "")
+        end
+        raise SDLError if n == 0
+
+        buffer
+      end
+
+      def seek(offset, whence = IO::SEEK_SET)
+        raise SDLError, "closed and freed rw" if closed?
+
+        n = SDL.SDL_RWseek(to_ptr, offset, whence)
+        raise SDLError if n < 0
+        0
+      end
+
+      alias pos= seek
+
+      def size
+        raise SDLError, "closed and freed rw" if closed?
+
+        n = SDL.SDL_RWsize(to_ptr)
+        raise SDLError if n < 0
+        n
+      end
+
+      def tell
+        raise SDLError, "closed and freed rw" if closed?
+
+        n = SDL.SDL_RWtell(to_ptr)
+        raise SDLError if n < 0
+        n
+      end
+
+      alias pos tell
+
+      def write(obj)
+        raise SDLError, "closed and freed rw" if closed?
+
+        ptr = obj.to_s
+        len = ptr.bytesize
+
+        n = SDL.SDL_RWwrite(to_ptr, ptr, 1, len)
+        raise SDLError if n < len
+        n
+      end
+    end
+  end
+end

data/lib/SDLRuby/rw/read_closure.rb

@@ -0,0 +1,28 @@
+module SDLRuby
+  class RW
+    class ReadClosure < Fiddle::Closure
+      include Fiddle
+
+      def initialize(obj)
+        # size_t (*read) (SDL_RWops *context, void *ptr, size_t size, size_t maxnum)
+        #
+        super(TYPE_SIZE_T, [TYPE_VOIDP, TYPE_VOIDP, TYPE_SIZE_T, TYPE_SIZE_T])
+        @obj = obj
+      end
+
+      def call(_, ptr, size, maxnum)
+        len = size * maxnum
+        return 0 if len.zero?
+
+        s = @obj.read(len)
+        return 0 if s.nil? || s.empty? # EOF
+
+        ptr[0, s.size] = s
+        s.size / size
+      rescue => e
+        SDL.last_error_message = e.message
+        0
+      end
+    end
+  end
+end

data/lib/SDLRuby/rw/seek_closure.rb

@@ -0,0 +1,22 @@
+module SDLRuby
+  class RW
+    class SeekClosure < Fiddle::Closure
+      include Fiddle
+
+      def initialize(obj)
+        # Sint64 (*seek) (SDL_RWops *context, Sint64 offset, int whence)
+        #
+        super(TYPE_INT64_T, [TYPE_VOIDP, TYPE_INT64_T, TYPE_INT])
+        @obj = obj
+      end
+
+      def call(_, offset, whence)
+        @obj.seek(offset, whence)
+        @obj.tell
+      rescue => e
+        SDL.last_error_message = e.message
+        -1
+      end
+    end
+  end
+end

data/lib/SDLRuby/rw/size_closure.rb

@@ -0,0 +1,21 @@
+module SDLRuby
+  class RW
+    class SizeClosure < Fiddle::Closure
+      include Fiddle
+
+      def initialize(obj)
+        # Sint64 (*size) (SDL_RWops *context)
+        #
+        super(TYPE_INT64_T, [TYPE_VOIDP])
+        @obj = obj
+      end
+
+      def call(_)
+        @obj.size
+      rescue => e
+        SDL.last_error_message = e.message
+        -1
+      end
+    end
+  end
+end

data/lib/SDLRuby/rw/write_closure.rb

@@ -0,0 +1,21 @@
+module SDLRuby
+  class RW
+    class WriteClosure < Fiddle::Closure
+      include Fiddle
+
+      def initialize(obj)
+        # size_t (*write) (SDL_RWops *context, const void *ptr, size_t size, size_t num)
+        #
+        super(TYPE_SIZE_T, [TYPE_VOIDP, TYPE_VOIDP, TYPE_SIZE_T, TYPE_SIZE_T])
+        @obj = obj
+      end
+
+      def call(_, ptr, size, num)
+        @obj.write(ptr.to_str(size * num)) / size
+      rescue => e
+        SDL.last_error_message = e.message
+        0
+      end
+    end
+  end
+end

data/lib/SDLRuby/rw_ops/mem_close.rb

@@ -0,0 +1,27 @@
+module SDLRuby
+  class RWOps
+    include Fiddle, SDL
+
+    # これはSDL3では不要になります。
+    # SDL3ではメンバーの関数ポインターにNULLを設定できます。
+    # それは”適切な”デフォルトの動作を意味します。
+    #
+    #
+    #
+    # SDL2ではcloseにはC関数ポインターを設定する必要がある。
+    # Rubyのクロージャ―を設定するとGCが動作時に該当のクロージャ―が既に回収されているため
+    # コアダンプする。
+    # また、NULLに設定するとSDL_RWclose関数の呼び出し時にコアダンプする。
+    # ここではSDLをハックしてmem_close関数を割り当てた。
+    # この関数は内部でSDL_FreeRW関数を呼び出すだけである。
+    #
+    # int (*close) (SDL_RWops *context)
+    #
+    MEM_CLOSE = module_eval do
+      ptr = Pointer.malloc(1, RUBY_FREE)
+      rw = SDL.SDL_RWFromMem(ptr, ptr.size)
+      raise SDLError if rw.null?
+      SDL_RWops.new(rw, SDL_FREE_RW)["close"].to_int
+    end
+  end
+end

data/lib/SDLRuby/rw_ops/rw_object.rb

@@ -1,108 +1,15 @@
+require_relative '../rw/read_closure'
+require_relative '../rw/seek_closure'
+require_relative '../rw/size_closure'
+require_relative '../rw/write_closure'
+require_relative 'mem_close'
+
 module SDLRuby
   class RWOps
     class RWObject
       include Fiddle, SDL
 
-      # size_t (*read) (SDL_RWops *context, void *ptr, size_t size, size_t maxnum)
-      #
-      class ReadClosure < Fiddle::Closure
-        include Fiddle
-
-        def initialize(obj)
-          super(TYPE_SIZE_T, [TYPE_VOIDP, TYPE_VOIDP, TYPE_SIZE_T, TYPE_SIZE_T])
-          @obj = obj
-        end
-
-        def call(_, ptr, size, maxnum)
-          len = size * maxnum
-          return 0 if len.zero?
-
-          s = @obj.read(len)
-          return 0 if s.nil? || s.empty? # EOF
-
-          ptr[0, s.size] = s
-          s.size / size
-        rescue => e
-          SDL.last_error_message = e.full_message
-          0
-        end
-      end
-
-      # Sint64 (*seek) (SDL_RWops *context, Sint64 offset, int whence)
-      #
-      class SeekClosure < Fiddle::Closure
-        include Fiddle
-
-        def initialize(obj)
-          super(TYPE_INT64_T, [TYPE_VOIDP, TYPE_INT64_T, TYPE_INT])
-          @obj = obj
-        end
-
-        def call(_, offset, whence)
-          @obj.seek(offset, whence)
-          @obj.tell
-        rescue => e
-          SDL.last_error_message = e.full_message
-          -1
-        end
-      end
-
-      # Sint64 (*size) (SDL_RWops *context)
-      #
-      class SizeClosure < Fiddle::Closure
-        include Fiddle
-
-        def initialize(obj)
-          super(TYPE_INT64_T, [TYPE_VOIDP])
-          @obj = obj
-        end
-
-        def call(_)
-          @obj.size
-        rescue => e
-          raise e if $DEBUG
-          SDL.last_error_message = e.full_message
-          -1
-        end
-      end
-
-      # size_t (*write) (SDL_RWops *context, const void *ptr, size_t size, size_t num)
-      #
-      class WriteClosure < Fiddle::Closure
-        include Fiddle
-
-        def initialize(obj)
-          super(TYPE_SIZE_T, [TYPE_VOIDP, TYPE_VOIDP, TYPE_SIZE_T, TYPE_SIZE_T])
-          @obj = obj
-        end
-
-        def call(_, ptr, size, num)
-          @obj.write(ptr.to_str(size * num)) / size
-        rescue => e
-          SDL.last_error_message = e.full_message
-          0
-        end
-      end
-
-      # closeにはC関数を設定する必要がある。
-      # クロージャ―を設定するとGCによる回収の際に
-      # 該当のクロージャ―が既に回収されているためコアダンプする。
-      # また、NULLに設定するとSDL_RWclose関数の呼び出し時にコアダンプする。
-      # SDLをハックしてmem_close関数を割り当てた。
-      # この関数は内部でSDL_FreeRW関数を呼び出すだけである。
-      #
-      # int (*close) (SDL_RWops *context)
-      #
-      MEM_CLOSE = module_eval do
-        _ptr = Pointer.malloc(1, RUBY_FREE)
-        rw = SDL.SDL_RWFromMem(_ptr, _ptr.size)
-        raise SDLError if rw.null?
-        st = SDL_RWops.new(rw)
-
-        st.close.freeze
-      end
-
-      # 引数 obj に与えたオブジェクトは SDL から close を呼び出されてもクローズしない。
+      # 引数objに与えたオブジェクトはSDLからcloseを呼び出されてもクローズしない。
       # このインスタンスを単独で扱う場合は使い終わったらclose関数を呼び出す必要がある。
       # そうしなければポインターは開放されずメモリーリークする。
       #
@@ -110,16 +17,15 @@ module SDLRuby
         ptr = SDL.SDL_AllocRW
         raise SDLError if ptr.null?
 
-        # SDLではSDL_RWopsポインターの開放はclose関数から行うように実装されている。
-        # これと同じ仕様とするため、このインスタンスではfreeの設定を行わない。
-        #
         @st = SDL_RWops.new(ptr)
 
+        # SDLではSDL_RWopsポインターの開放はclose関数ポインターを呼び出して行う仕様となっている。
+        #
         @st.close = MEM_CLOSE
-        @st.read = @read = ReadClosure.new(obj)
-        @st.seek = @seek = SeekClosure.new(obj)
-        @st.size = @size = SizeClosure.new(obj)
-        @st.write = @write = WriteClosure.new(obj)
+        @st.read  = @read  = RW::ReadClosure.new(obj)
+        @st.seek  = @seek  = RW::SeekClosure.new(obj)
+        @st.size  = @size  = RW::SizeClosure.new(obj)
+        @st.write = @write = RW::WriteClosure.new(obj)
       end
 
       def to_ptr = @st.to_ptr