Strona działa najlepiej z włączonym JavaScript.
Strona główna
Odkrywaj
lain.church
Pomoc
Zarejestruj się
Zaloguj się
izaya
/
collapseos
kopia lustrzana
https://github.com/hsoft/collapseos.git
Obserwuj
1
Polub
1
Forkuj
0
Kod
Zgłoszenia
0
Wydania
0
Wiki
Aktywność
Przeglądaj źródła
Fix broken LIT"
master
Virgil Dupras
3 lat temu
rodzic
8bb9230f49
commit
ebf47a2ab5
2 zmienionych plików
z
1 dodań
i
1 usunięć
Widok podzielony
Opcje porównania
Pokaż statystyki
Ściągnij plik aktualizacji
Ściągnij plik porównania
+1
-1
blk/382
BIN
cvm/forth.bin
+ 1
- 1
blk/382
Wyświetl plik
@@ -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
Wyświetl plik
Napisz
Podgląd
Ładowanie…
Anuluj
Zapisz