From ad3b02f34ef51d8df8db0472f8bebf412251ea2b Mon Sep 17 00:00:00 2001 From: ken Date: Fri, 16 Mar 2018 13:27:57 -0700 Subject: [PATCH] master commit for publish --- forth.forth | 15 --------------- 1 file changed, 15 deletions(-) diff --git a/forth.forth b/forth.forth index 47224b9..5c9834f 100644 --- a/forth.forth +++ b/forth.forth @@ -155,21 +155,6 @@ here define-does then compiling ; : '> word find-does ; :> '> word find-does , ; -\ CHAR -: CHAR: word drop @8_u ; -:> CHAR: lit lit , ' char: execute , ; - -\ JSON Compiler -: JSON-CTRL-CHAR char: { =? if ;; then - char: } =? if ;; then - char: [ =? if ;; then ; -: JSON-PARSE-V ; -: JSON-PARSE-" ; -: JSON-PARSE-[ ; -: JSON-PARSE-{ ; -:> JSON-WORD wordstart key -1 =? if ;; then ws? ; - - \ Include a remote file : REQUIRE" ' quit channel-open dup \' " \, fetch channel-await ; -- 2.18.0