Учитывая, что Форт умирает (не глядя на некие рейтинги),
то пора его душу перенести из мира человеков, в лучший для него мир - электронный.
Только подготовить к переходу, поучить малость - и пусть живёт своей жизнью. Тот мир (виртуальный) среагировал благосклонно - и даже вариант предложил простенький.
И пусть себе там живёт, радует случайных посетителей его нового мира! Постараемся?
Sotnik >> Стековая машина. Язык Форт. Напиши ядро компилятора для ARM.
GPT >> Ядро компилятора для ARM на языке Форт может выглядеть примерно так:
Код:
: load_reg ( addr reg -- ) ldr r0, [r1]
str r0, [r2] ;
: add_reg ( reg1 reg2 -- reg3 ) add r0, r1, r2
r0 ;
: sub_reg ( reg1 reg2 -- reg3 ) sub r0, r1, r2
r0 ;
: mul_reg ( reg1 reg2 -- reg3 ) mul r0, r1, r2
r0 ;
: div_reg ( reg1 reg2 -- reg3 ) sdiv r0, r1, r2
r0 ;
: start ( -- ) mov r0, #1
mov r1, #2
load_reg r0, r1
add_ reg r0, r1
sub_ reg r0, r1
mul_ reg r0, r1
div_ reg r0, r1 ;
GPT >> Этот код содержит примеры создания регистров, загрузки их значения, выполнения арифметических операций (сложение, вычитание, умножение, деление) и основной блок, в котором происходит последовательное выполнение этих операций.
Вход
Регистрация
Благодарности
Forth-FAQ
