From b1c4ba3f0b7204ee4ccb7c6f493607ab5337d5d3 Mon Sep 17 00:00:00 2001 From: Tim Vaughan Date: Sun, 29 May 2016 14:08:36 +1200 Subject: [PATCH] Added COMPILE. --- src/lib_1_basic.4th | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/src/lib_1_basic.4th b/src/lib_1_basic.4th index 40851f3..90fad63 100644 --- a/src/lib_1_basic.4th +++ b/src/lib_1_basic.4th @@ -44,10 +44,13 @@ : SPACE BL emit ; : ' BL WORD FIND DROP ; -: [COMPILE] IMMEDIATE ' , ; : ['] IMMEDIATE LIT LIT , ' , ; +: [COMPILE] IMMEDIATE ' , ; +: COMPILE IMMEDIATE + LIT LIT , ' , LIT , , ; + : LITERAL IMMEDIATE ['] LIT , , ; : CHAR BL WORD 1+ @ ; -- 2.20.1