FilesExpand file tree

 master

/

finally.lua

Copy path

Blame

More file actions

Blame

More file actions

Latest commit

 

History

History

History

39 lines (32 loc) · 859 Bytes

 master

/

finally.lua

Copy path

Top

File metadata and controls

• Code
• Blame

39 lines (32 loc) · 859 Bytes

Raw

Copy raw file

Download raw file

Open symbols panel

Edit and raw actions

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

36

37

38

39

---

-- ## SafeLuaAPI compiler, resource cleanup utlities

--

-- @author Demi Marie Obenour

-- @copyright 2016

-- @license MIT/X11

-- @module finally

local finally = {}

local open, close = io.open, io.close

local rename, remove = os.rename, os.remove

local error = error

local rawget = rawget

if rawget(_G, 'setfenv') then

setfenv(1, {})

end

local function finally_helper(cleanup, cleanup_arg, is_okay, ...)

cleanup(cleanup_arg, is_okay)

if is_okay then

return ...

else

error(...)

end

end

local function finally_(protected, cleanup, cleanup_arg, ...)

return finally_helper(cleanup, cleanup_arg, pcall(protected, ...))

end

finally.finally = finally_

function finally.with_file(filename, mode, function_, ...)

local handle = open(filename, mode)

return finally_(function_, close, handle, handle, ...)

end

return finally