; insert newLISP code for preload here (set (global 'display-html) (fn (x y) (replace {\} x {\\}) (replace "\n" x "\\n") (replace {'} x {\'}) (replace {"} x {\"}) (eval-string-js (if (true? y) (string {displayHTMLnew('} x {')}) (string {displayHTML('} x {')}))))) ; eof
Downloading...
Copyright © 2014-2019,
newlisp.org