Forth и другие саморасширяющиеся системы программирования Locations of visitors to this page
Текущее время: Пн июн 01, 2020 08:25

...
Google Search
Forth-FAQ Spy Grafic

Часовой пояс: UTC + 3 часа [ Летнее время ]




Начать новую тему Ответить на тему  [ Сообщений: 7 ] 
Автор Сообщение
 Заголовок сообщения: Re: OpenForth
СообщениеДобавлено: Пт мар 09, 2012 16:47 
Не в сети

Зарегистрирован: Ср май 03, 2006 11:27
Сообщения: 1394
Откуда: St.Petersburg
Благодарил (а): 2 раз.
Поблагодарили: 11 раз.
zehotello писал(а):
Кста, ассемблер тоже входит в мою личную программу

Вроде EFORTH самый простой.
С исходниками форт-системы можно разобраться не зная ни форта ни языка
на котором она написана. Т.к примитивы лежащие в основе форт-системе,
в большинстве, являются примитивами в изначальном смысле этого слова.



За это сообщение автора Mihail поблагодарил: zehotello
Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: "Не делайте сами, берите мое"
СообщениеДобавлено: Пт мар 09, 2012 16:50 
Не в сети
Administrator
Administrator
Аватара пользователя

Зарегистрирован: Вт май 02, 2006 22:48
Сообщения: 6918
Благодарил (а): 17 раз.
Поблагодарили: 112 раз.
Сюда буду сбрасывать призывы "брать из инета готовое" и "доделывать давно начатое".


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: Re: "Не делайте сами, берите мое"
СообщениеДобавлено: Чт авг 30, 2012 16:20 
Не в сети

Зарегистрирован: Ср май 03, 2006 11:27
Сообщения: 1394
Откуда: St.Petersburg
Благодарил (а): 2 раз.
Поблагодарили: 11 раз.
http://fpauk.narod.ru/netforth.tar.gz Форт-машина в виде telnet сервера
(версия SOD.MAK) (порт 3333).
Под виндой не работает. На сколько я понял, win32 не позволяет
работать с сокетами как с файлами.
Не работают KEY и KEY? - соответственно, пример tetris тоже не работает.


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: Re: "Не делайте сами, берите мое"
СообщениеДобавлено: Чт авг 30, 2012 18:49 
Не в сети
Аватара пользователя

Зарегистрирован: Вт мар 20, 2007 23:39
Сообщения: 1261
Благодарил (а): 3 раз.
Поблагодарили: 18 раз.
Под виндой для сокетов есть отдельные апи.

_________________
Cтоимость сопровождения программного обеспечения пропорциональна квадрату творческих способностей программиста.
Роберт Д. Блисc


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: Re: "Не делайте сами, берите мое"
СообщениеДобавлено: Пт сен 07, 2012 15:03 
Не в сети

Зарегистрирован: Ср май 03, 2006 11:27
Сообщения: 1394
Откуда: St.Petersburg
Благодарил (а): 2 раз.
Поблагодарили: 11 раз.
VoidVolker писал(а):
Под виндой для сокетов есть отдельные апи.


send и recv работают и тат и там. Но под Линуксом можно использовать write и read.
Это позволяет перенаправлять потоки ввода вывода. Чтобы под виндой можно
было перенапрвлять потоки я идентификатор сокетов отметил единицей в знаковом разряде
http://fpauk.narod.ru/netforth.7z
В зависимости от этого флага вызывается ( send и recv ) или (write и read).
Код:
ssize_t twrite (int __fd, __const void *__buf, size_t __n)
{
   if(__fd&0x80000000) return(send(__fd^0x80000000,__buf,__n,0));
   else   return(write(__fd,__buf,__n));
}

ssize_t tread (int __fd, __const void *__buf, size_t __n)
{
   if(__fd&0x80000000) return(recv(__fd^0x80000000,__buf,__n,0));
   else   return(read(__fd,__buf,__n));
}


Как отследить нажатие клавиши по средствам телнета я не нашел.
Т.ч. пример тетрис работает только в локальном терминале.
Для работы в локальном терминале нужно
закомментировать спроку
netid=c_accept(c_serv(3333))|0x80000000;
пересобрать систему


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: Re: "Не делайте сами, берите мое"
СообщениеДобавлено: Сб сен 08, 2012 09:48 
Не в сети
Аватара пользователя

Зарегистрирован: Вт мар 20, 2007 23:39
Сообщения: 1261
Благодарил (а): 3 раз.
Поблагодарили: 18 раз.
Mihail писал(а):
Но под Линуксом можно использовать write и read

Точно, это я как-то упустил из виду.

_________________
Cтоимость сопровождения программного обеспечения пропорциональна квадрату творческих способностей программиста.
Роберт Д. Блисc


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: Re: "Не делайте сами, берите мое"
СообщениеДобавлено: Вт сен 11, 2012 23:34 
Не в сети

Зарегистрирован: Ср май 03, 2006 11:27
Сообщения: 1394
Откуда: St.Petersburg
Благодарил (а): 2 раз.
Поблагодарили: 11 раз.
Сервер Форт-машин http://fpauk.narod.ru/netforth.zip
Функция pthread_getspecific дает некоторую альтернативу юзеровским переменным Форта,
но ужасные тормоза. Пока я особо за скоростью не гонюсь.


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 7 ] 

Часовой пояс: UTC + 3 часа [ Летнее время ]


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1


Вы не можете начинать темы
Вы можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

cron
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
phpBB сборка от FladeX // Русская поддержка phpBB