21 lines
674 B
Nim
21 lines
674 B
Nim
import cligen, os, streams
|
|
import common
|
|
|
|
proc main(files:seq[string], lines=10, bytes=0) =
|
|
# if files.len == 0:
|
|
# files.add "-"
|
|
for file in files:
|
|
var f = if file == "-": stdin
|
|
else: open(file, fmRead)
|
|
if bytes > 0:
|
|
var currentByte = 0
|
|
while not f.endOfFile and currentByte < bytes:
|
|
write(stdout, f.readChar)
|
|
inc currentByte
|
|
elif lines > 0:
|
|
var currentLine = 0
|
|
while not f.endOfFile and currentLine < lines:
|
|
writeLine(stdout, f.readLine)
|
|
inc currentLine
|
|
|
|
dispatch(main, version=("version", nimbaseVersion))
|