суфикс z нужно понимать как последний вариант?

Вот исправленный интерпретатор:
http://private.peterlink.ru/kinz/3.2ru/exu_iz

Пример по многозадачности из документации теперь работает.
Как и прежде - никаких гарантий с моей стороны.

Вот интересная штука:
http://www.longene.org/en/download.php

Объединённое ядро, совместимое с программами Windows и Linux.
Делают китайцы. Кто-нибудь пробовал?

Интерпретатор для Windows exw_i.exe нормально работает с примером по многозадачности под Mandriva 2010.2 в консоли Wine. Прямо-таки как у себя дома. Если в MC, запущенном в графической консоли, нажать Enter на exw_i.exe, открывается консоль Wine и в ней на чистейшем русском запускается интерпретатор для Windows. И исполняет хоть ed.ex, хоть task.e (task.e - это тот пример, который я вчера привёл из документации).

Что касается многозадачности для exu_i, то там потребуется время для разбирательств с ассемблерными вставками в be_task.c, о которых Роб предупреждает в комментариях. Там дело в версиях gcc. У Роба старый компилятор. И с новым компилятором не работает и стандартный исходный код RDS, даже без моих двуязычных модификаций.

>Спасибо за подсказку, Insolor!
Да не за что, я случайно:)
Со своей "проблемой" разобрался, надо всего лишь после каждого task_schedule() делать task_yield(), тогда задания побегут в нужном порядке:)

А под DOS/WIN с этим примером всё нормально.
И на русском, и на английском.
"Будем искать..."

В примере надо будет только подправить символы новой строки - слэши съедены.

Вот пример из документации.
Я его сейчас попробовал на двуязычных интерпретаторах, рушатся все три :-)

Спасибо за подсказку, Insolor!


constant TRUE = 1, FALSE = 0

type boolean(integer x)
return x = 0 or x = 1
end type

boolean t1_running, t2_running

procedure task1(sequence message)
for i = 1 to 10 do
printf(1, "task1 (%d) %sn", {i, message})
task_yield()
end for
t1_running = FALSE
end procedure

procedure task2(sequence message)
for i = 1 to 10 do
printf(1, "task2 (%d) %sn", {i, message})
task_yield()
end for
t2_running = FALSE
end procedure

puts(1, "main task: startn")
atom t1, t2
t1 = task_create(routine_id("task1"), {"Hello"})
t2 = task_create(routine_id("task2"), {"Goodbye"})

task_schedule(t1, {2.5, 3})
task_schedule(t2, {5, 5.1})

t1_running = TRUE
t2_running = TRUE

while t1_running or t2_running do
if get_key()=''q'' then
exit
end if
task_yield()
end while
puts(1, "main task: stopn")

Этот пример хорошо иллюстрирует работу многозадачности.

Реального примера как такового нет, просто разбираюсь:)
Просто как-то не логично. По идее должно работать как очередь задач (первый вошел - первый вышел), а работает как стек задач (последний вошел - первый вышел).

пример какой то не понятный....
задача(многозадачность) и порядок вещи не связанные.
Что реально хотел параллельно(а не в определённом порядке) обрабатывать?

У меня по поводу многозадачности вопрос.
Допустим я запланировал задачи в определенном порядке. Почему выполняются в обратном?
Вот пример:
procedure echo(sequence s)
puts(1,s)
puts(1,''n'')
end procedure

integer task

task = task_create(routine_id("echo"),{"first"})
task_schedule(task,1)

task = task_create(routine_id("echo"),{"second"})
task_schedule(task,1)

task = task_create(routine_id("echo"),{"third"})
task_schedule(task,1)

task_yield()

Выводится:
third
second
first

Доработал функцию recode()/перекодировать() для вывода русских текстов DOS/WIN/KOI/ISO/MAC в формате utf-8.
Начал корректировать red.ex для работы под exu_i и внедрять в интерпретаторы русскую диагностику.

Проверил exu_ia cо своим пакетом SDL на Mandriva 2010.2. Работает, правда в паре-тройке программ пришлось кое-где заменить тип integer на тип atom. SDL требует запуска X, если кто не знает.

> план тестирования трёх

А, понял, замысел такой - тестируешь один, если рухнул, пробуешь на той же программе со вторым и с третьим, если все три рухнули, хорошо. Но если первый рухнул, а второй работает - ещё лучше. :-)

У меня пока не рушится.

> а исходники и make будут?

Конечно, я собираюсь выпустить весь пакет открытых исходников и make-файлов в полном соответствии с лицензией RDS. У пакета же лицензия общественного достояния с открытым кодом.

Но на всё нужно время.

Платформы же разные, а я уже старый, склероз, то да сё.

Попробуй попрыгать туда-сюда между DOC, Windows и Linux, когда на консолях одни кодировки, а в программах другие. Это англичанам просто - одна кодировка везде.