Merge branch 'hotfix/seek'

Project.toml

@@ -1,7 +1,7 @@
 name = "Bedgraph"
 uuid = "0bcc2ff6-69eb-520d-bede-0374fc5bd2fd"
 authors = ["Ciarán O'Mara <[email protected]>"]
-version = "1.0.4"
+version = "1.0.5"
 
 [extras]
 Test = "8dfed614-e22c-5e08-85e1-65c5234f0b40"

src/reader.jl

@@ -13,12 +13,12 @@ end
 
 
 function seekNextRecord(io::IO) :: Nothing
-    seekstart(io)
 
     pos = position(io)
+    initial = pos == 0 ? -1 : pos # Note: Allows for the fist line of headerless bedGraph file to be read.
     line = ""
 
-    while !eof(io) && !isLikeRecord(line)
+    while !eof(io) && (!isLikeRecord(line) || pos == initial)
         pos = position(io)
         line = readline(io)
     end
@@ -57,6 +57,7 @@ function readRecord(io::IO) :: Union{Nothing, Record}
 end
 
 function readRecords(io::IO) :: Vector{Record}
+    seekstart(io)
     seekNextRecord(io)
 
     records = Vector{Record}()

test/runtests.jl

@@ -81,9 +81,17 @@ end
 
 # Check things for headerless Bag.files.
 open(Bag.file_headerless, "r") do io
+
+	# Check that the first record of a headerless bedGraph file can be sought.
     Bedgraph.seekNextRecord(io)
     @test position(io) == 0
-    @test readline(io) == Bag.line1
+    @test readline(io) == Bag.line1 # IO position is at the start of line 2.
+
+	# Check behaviour of consecutive calls to Bedgraph.seekNextRecord(io).
+	Bedgraph.seekNextRecord(io) # Skip to start of line 3.
+	Bedgraph.seekNextRecord(io) # Skip to start of line 4.
+	@test readline(io) == Bag.line4
+
 end