X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?a=blobdiff_plain;f=src%2Fforth.jl;h=d80d7e2faaec29139c0d17071d897630e0735180;hb=a914fb765622b7311425a89694c05a1976cdcc6a;hp=97e9c4b938eddc121b1060f0a269c511b242a1a5;hpb=3fc4b0ecf89a6325cb0492135f2a83cc02e447c5;p=forth.jl.git diff --git a/src/forth.jl b/src/forth.jl index 97e9c4b..d80d7e2 100644 --- a/src/forth.jl +++ b/src/forth.jl @@ -750,9 +750,9 @@ function getLineFromSTDIN() function getFrag(s) chars = collect(s) - slashIdx = findlast(chars, '\\') + slashIdx = findlast(isequal('\\'), chars) - if slashIdx > 0 + if slashIdx != nothing return join(chars[slashIdx:length(chars)]) else return nothing @@ -1270,7 +1270,7 @@ oldCWD = "" SETLIBCWD_CFA = defPrimWord("SETLIBCWD", () -> begin global oldCWD = pwd() if !isfile("lib.4th") # Exception for debugging. - cd(Pkg.dir("forth","src")) + cd(@__DIR__) # Macro expands to CWD at compile time end return NEXT end)