--- gforth/libcc.fs 2008/07/13 19:20:54 1.44 +++ gforth/libcc.fs 2008/07/13 22:52:00 1.45 @@ -641,9 +641,11 @@ clear-libs : init-libcc ( -- ) s" ~/.gforth/libcc-named/" libcc-named-dir-v 2! +[IFDEF] make-path make-path to libcc-path libcc-named-dir libcc-path also-path [ s" libccdir" getenv ] sliteral libcc-path also-path +[THEN] ; init-libcc