1 --[[--

2 slot.reset_all{

3 except = except -- Reset all slots, except slots named in this list

4 }

5

6 Calling this function resets all slots to be empty. An exclusion list may be passed to the function as named argument.

7

8 --]]--

9

10 function slot.reset_all(args)

11 local saved

12 if args and args.except then

13 saved = {}

14 for i, key in ipairs(args.except) do

15 saved[key] = slot._data[key]

16 end

17 end

18 slot._data = setmetatable({}, slot._data_metatable)

19 if saved then

20 for key, value in pairs(saved) do

21 slot._data[key] = value

22 end

23 end

24 end