deprecated and replaced linefilter with linefilter!

docs/src/library.md

@@ -47,7 +47,7 @@ Reduce.unfoldgen
 ```
 
 ```@docs
-Reduce.linefilter
+Reduce.linefilter!
 ```
 
 ```@docs

src/Reduce.jl

@@ -1,6 +1,7 @@
 __precompile__()
 module Reduce
 using ForceImport, SyntaxTree, LinearAlgebra
+!isdefined(Reduce,:linefilter!) && (linefilter! = SyntaxTree.linefilter)
 
 #   This file is part of Reduce.jl. It is licensed under the MIT license
 #   Copyright (C) 2017 Michael Reed

src/parser.jl

@@ -314,7 +314,7 @@ for mode ∈ [:expr,:unary,:switch,:args]
                             :(print(qr, smp); smp = "")
                         end))
                     end
-                    push!(nsr,$((mode == :expr) ? :("("*String(take!(qr))*")" |> Meta.parse |> linefilter) : :qr))
+                    push!(nsr,$((mode == :expr) ? :("("*String(take!(qr))*")" |> Meta.parse |> linefilter!) : :qr))
                     end; else; :(nothing); end)
                 elseif occursin("end",sh[en])
                     nothing
@@ -600,7 +600,7 @@ end
         show_expr(io,expr.args[1])
         show_expr(io,expr.args[2])
     elseif expr.head == :block
-        lxpr = linefilter(expr)
+        lxpr = linefilter!(expr)
         if length(lxpr.args) == 1
             show_expr(io,lxpr.args[1])
         else

src/rexpr.jl

@@ -102,15 +102,19 @@ Reduce.linelength()::Integer
 and sets the output line length to the integer `tput cols`. It returns the output line length (so that it can be stored for later resetting of the output line if needed).
 """
 function linelength()
-    c = read(`tput cols`,String) |> Meta.parse
-    global cols
-    if c ≠ cols
-        ws = rcall("ws")
-        rcall("linelength($c)")
-        rcall(ws)
-        cols = c
+    try
+        c = read(`tput cols`,String) |> Meta.parse
+        global cols
+        if c ≠ cols
+            ws = rcall("ws")
+            rcall("linelength($c)")
+            rcall(ws)
+            cols = c
+        end
+        return c
+    catch
+        ColCheck(false)
     end
-    return c
 end
 
 function show(io::IO, ::MIME"text/plain", r::RExpr)