FilesExpand file tree

 master

/

test.lua

Copy path

Blame

More file actions

Blame

More file actions

Latest commit

 

History

History

History

executable file

·

53 lines (44 loc) · 1.2 KB

 master

/

test.lua

Copy path

Top

File metadata and controls

• Code
• Blame

executable file

·

53 lines (44 loc) · 1.2 KB

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

40

41

42

43

44

45

46

47

48

49

50

51

52

#!/usr/local/bin/lua

-----------------------------------------------------------------------------

-- gzip file I/O library test script

--

-- This file was created by Judge Maygarden (jmaygarden at computer dot org)

-- and is hereby place in the public domain

-----------------------------------------------------------------------------

require "gzio"

local filename = "test.txt"

local gzFile

-- stream the text file into a gzip file

gzFile = assert(gzio.open(filename..".gz", "w"))

for line in io.lines(filename) do

gzFile:write(line..'\n')

end

gzFile:close()

-- echo the gzip file to stdout

gzFile = assert(gzio.open(filename, "r"), "gzio.open failed!")

for line in gzFile:lines() do

print(line)

end

-- rewind and do it again with gzFile:read

gzFile:seek("set")

print(gzFile:read("*a"))

gzFile:close()

-----------------------------------------------------------------------------

-- The following functions also need to be tested:

--

--gzFile:flush

--gzFile:setvbuf

--gzio.close

--gzio.flush

--gzio.input

--gzio.lines

--gzio.output

--gzio.popen

--gzio.read

--gzio.stderr

--gzio.stdin

--gzio.stdout

--gzio.tmpfile

--gzio.type

--gzio.write

-----------------------------------------------------------------------------