Цей веб-сайт працює краще з JavaScript.
Головна
Огляд
lain.church
Довідка
Реєстрація
Увійти
izaya
/
collapseos
дзеркало
https://github.com/hsoft/collapseos.git
Слідкувати
1
В обрані
1
Форк
0
Код
Проблеми
0
Релізи
0
Вікі
Активність
Переглянути джерело
forth: forgot to commit high.fs...
pull/95/head
Virgil Dupras
4 роки тому
джерело
ac914c3847
коміт
d5b6659507
1 змінених файлів
з
14 додано
та
0 видалено
Розділений перегляд
Параметри порівняння
Показати статистику
Завантажити патч
Завантажити файл різниці
+14
-0
forth/high.fs
+ 14
- 0
forth/high.fs
Переглянути файл
@@ -0,0 +1,14 @@
( Higher level stuff that generally requires all core units )
: ."
LIT
BEGIN
C< DUP ( c c )
( 34 is ASCII for " )
DUP 34 = IF DROP DROP 0 0 THEN
C,
0 = UNTIL
COMPILE (print)
; IMMEDIATE
: ABORT" [COMPILE] ." COMPILE ABORT ; IMMEDIATE
Писати
Попередній перегляд
Завантаження…
Відмінити
Зберегти