From 9d05d2315c3551809024f6c9acf21b78e284a4b5 Mon Sep 17 00:00:00 2001
From: Matthias Richter <vrld@vrld.org>
Date: Fri, 2 Dec 2011 14:03:13 +0100
Subject: [PATCH] Remove obsulete file

---
 slam/bdsm.lua | 165 --------------------------------------------------
 1 file changed, 165 deletions(-)
 delete mode 100644 slam/bdsm.lua

diff --git a/slam/bdsm.lua b/slam/bdsm.lua
deleted file mode 100644
index 96c81b8..0000000
--- a/slam/bdsm.lua
+++ /dev/null
@@ -1,165 +0,0 @@
--- Benignly Designed Sound Manager
---
--- Copyright (c) 2011 Matthias Richter
--- Permission is hereby granted, free of charge, to any person obtaining a copy
--- of this software and associated documentation files (the "Software"), to deal
--- in the Software without restriction, including without limitation the rights
--- to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
--- copies of the Software, and to permit persons to whom the Software is
--- furnished to do so, subject to the following conditions:
---
--- The above copyright notice and this permission notice shall be included in
--- all copies or substantial portions of the Software.
---
--- Except as contained in this notice, the name(s) of the above copyright holders
--- shall not be used in advertising or otherwise to promote the sale, use or
--- other dealings in this Software without prior written authorization.
---
--- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
--- IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
--- FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
--- AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
--- LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
--- OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
--- THE SOFTWARE.
---
-
-local newInstance = love.audio.newSource
-local stop = love.audio.stop
-
-------------------
--- source class --
-------------------
-local Source = {}
-Source.__index = Source
-Source.__newindex = error
-
-local function remove_stopped(sources)
-	local remove = {}
-	for s in pairs(sources) do
-		remove[s] = true
-	end
-	for s in pairs(remove) do
-		sources[s] = nil
-	end
-end
-
-local function get_what(what)
-	if type(what) == 'table' then
-		return what[math.random(1,#what)]
-	end
-	return what
-end
-
-local play_instance, stop_instance
-function Source:play()
-	remove_stopped(self.instances)
-	local instance = newInstance(get_what(self.what), self.how)
-
-	-- overwrite instance:stop() and instance:play()
-	if not (play_instance and stop_instance) then
-		play_instance = getmetatable(instance).play
-		getmetatable(instance).play = error
-
-		stop_instance = getmetatable(instance).stop
-		getmetatable(instance).stop = function(this)
-			stop_instance(this)
-			self.instances[this] = nil
-		end
-	end
-
-	instance:setLooping(self.looping)
-	instance:setPitch(self.pitch)
-	instance:setVolume(self.volume)
-
-	self.instances[instance] = instance
-	play_instance(instance)
-	return instance
-end
-
-function Source:stop()
-	for s in pairs(self.instances) do
-		s:stop()
-	end
-	self.instances = {}
-end
-
-function Source:addTags(tag, ...)
-	if not tag then return end
-	love.audio.tags[tag][self] = self
-	return Source.addTags(self, ...)
-end
-
-function Source:removeTags(tag, ...)
-	if not tag then return end
-	love.audio.tags[tag][self] = nil
-	return Source.removeTags(self, ...)
-end
-
-function Source:isStatic()
-	return how ~= "stream"
-end
-
--- getter/setter for looping, pitch and volume
-for _, property in ipairs{'looping', 'pitch', 'volume'} do
-	local name = property:sub(1,1):upper() .. property:sub(2)
-	Source['get' .. name] = function(self)
-		return self[property]
-	end
-
-	Source['set' .. name] = function(self, val)
-		self[property] = val
-		for s in pairs(self.instances) do
-			s['set' .. name](s, val)
-		end
-	end
-end
-
---------------------------
--- love.audio interface --
---------------------------
-function love.audio.newSource(what, how)
-	local s = {
-		what      = what,
-		how       = how,
-		instances = {},
-		looping   = false,
-		pitch     = 1,
-		volume    = 1,
-	}
-	love.audio.tags.all[s] = s
-	return setmetatable(s, Source)
-end
-
-function love.audio.play(what)
-	assert(what and what.instances, "Can only play source objects.")
-	return what:play()
-end
-
-function love.audio.stop(what)
-	if what and what.stop then return what:stop() end
-	stop()
-end
-
-----------
--- tags --
-----------
-local Tag = { __mode = "kv" }
-function Tag:__index(func)
-	-- calls a function on all tagged sources
-	return function(...)
-		for s in pairs(self) do
-			assert(type(s[func]) == "function", ("`%s' does not name a function."):format(func))
-			s[func](s, ...)
-		end
-	end
-end
-
-love.audio.tags = setmetatable({}, {
-	__newindex = error,
-	__index = function(t,k)
-		local tag = setmetatable({}, Tag)
-		rawset(t, k, tag)
-		return tag
-	end
-})