Il sito funziona meglio con JavaScript.
Home
Esplora
lain.church
Aiuto
Registrati
Accedi
izaya
/
collapseos
mirror da
https://github.com/hsoft/collapseos.git
Segui
1
Vota
1
Forka
0
Codice
Problemi
0
Rilasci
0
Wiki
Attività
Sfoglia il codice sorgente
Fix broken LIT"
master
Virgil Dupras
3 anni fa
parent
8bb9230f49
commit
ebf47a2ab5
2 ha cambiato i file
con
1 aggiunte
e
1 eliminazioni
Visualizzazione separata
Diff Options
Show Stats
Download Patch File
Download Diff File
+1
-1
blk/382
BIN
cvm/forth.bin
+ 1
- 1
blk/382
Vedi File
@@ -3,7 +3,7 @@
C< DUP 34 ( ASCII " ) = IF DROP EXIT THEN C,
AGAIN ;
: LIT"
COMPILE (s)
H@ 0 C, ,"
0x2b ( (s) ) ,
H@ 0 C, ,"
DUP H@ -^ 1- ( a len ) SWAP C!
; IMMEDIATE
: ." [COMPILE] LIT" COMPILE (print) ; IMMEDIATE
BIN
cvm/forth.bin
Vedi File
Write
Preview
Loading…
Annulla
Salva