commit ab8afdde83bcf1412d0c1161a72244388a27c327
parent b792b226d8e6a14562b23aa7a540b0564e576d36
Author: Virgil Dupras <hsoft@hardcoded.net>
Date: Sat, 7 Jan 2023 19:59:05 -0500
xcomp/bootlo: trim a few unused words
Diffstat:
1 file changed, 0 insertions(+), 4 deletions(-)
diff --git a/fs/xcomp/bootlo.fs b/fs/xcomp/bootlo.fs
@@ -111,13 +111,9 @@ create _ 0 ,
alias noop idle
: &+ ( n -- ) doer , does> @ + ;
-: &@ ( n -- ) doer , does> @ @ ;
-: &w@ ( n -- ) doer , does> @ w@ ;
-: &c@ ( n -- ) doer , does> @ c@ ;
: &+@ ( n -- ) doer , does> @ + @ ;
: &+w@ ( n -- ) doer , does> @ + w@ ;
: &+c@ ( n -- ) doer , does> @ + c@ ;
-: &+! ( n -- ) doer , does> @ + ! ;
\ index of "c" inside range "a u". -1 if not found
: [c]? ( c a u -- i )