Forth и другие саморасширяющиеся системы программирования Locations of visitors to this page
Текущее время: Пт мар 29, 2024 17:18

...
Google Search
Forth-FAQ Spy Grafic

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




Начать новую тему Ответить на тему  [ Сообщений: 26 ]  На страницу 1, 2  След.
Автор Сообщение
 Заголовок сообщения: Помощь неопытным
СообщениеДобавлено: Чт янв 25, 2007 17:22 
Не в сети

Зарегистрирован: Чт янв 25, 2007 15:29
Сообщения: 7
Благодарил (а): 0 раз.
Поблагодарили: 0 раз.
Уважаемые собеседники. Помогите... Я конечно не сильно силен в области Forth, но печатать слова умею. Почему в версии 4,18, скачанной отсюда (http://sourceforge.net/project/showfile ... p_id=17919), под управлением XP, не работают некоторые слова. В частности "FORGET" категорически не находит. Может, я не то делаю, но помощи ждать неоткуда. А в общем ОЧЕНЬ серьёзная и полезная вещь на вооружении программиста...

_________________
Новичок


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Чт янв 25, 2007 17:29 
Не в сети
Moderator
Moderator
Аватара пользователя

Зарегистрирован: Чт май 04, 2006 00:53
Сообщения: 5062
Откуда: был Крым, теперь Новосибирск
Благодарил (а): 23 раз.
Поблагодарили: 63 раз.
Валерий писал(а):
FORGET


отсутствует в 94 стандарте, так что можете не искать.
если не секрет, зачем вам FORGET?


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Чт янв 25, 2007 17:41 
Не в сети
Аватара пользователя

Зарегистрирован: Чт июл 20, 2006 11:31
Сообщения: 2168
Откуда: Екб
Благодарил (а): 0 раз.
Поблагодарили: 41 раз.
Валерий писал(а):
В частности "FORGET" категорически не находит.

FORGET в SPF отсутствует. Но есть MARKER ( "name" -- ) (в lib\include\core-ext.f).

_________________
С уважением, chess


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Чт янв 25, 2007 18:00 
Не в сети

Зарегистрирован: Чт янв 25, 2007 15:29
Сообщения: 7
Благодарил (а): 0 раз.
Поблагодарили: 0 раз.
Разрешите ответить вам двоим сразу. Хороший ответ, спасибо. Тогда Вам встречный вопрос - можно ли найти какую-либо начальную документацию по spf? Я люблю начинать что-либо с прочтение и одновременного выполнения. Та документация, которая мне досталась из интернета, оказывается (с Вашей подсказкой) не помогает должным образом. У меня есть опыт программирования в разных языках, но мягкость Forth я уже оценил (мой опыт Forth-а - 2 дня). Помогите, постараюсь больше по пустякамне тревожить. Просто под мои задумки возможности Forth-а прекрасно ложатся. С ув.. Заранее благодарен.

_________________
Новичок


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Чт янв 25, 2007 18:19 
Не в сети
Moderator
Moderator
Аватара пользователя

Зарегистрирован: Чт май 04, 2006 00:53
Сообщения: 5062
Откуда: был Крым, теперь Новосибирск
Благодарил (а): 23 раз.
Поблагодарили: 63 раз.
в папку docs дистрибутива смотрели?


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Чт янв 25, 2007 18:24 
Не в сети
Moderator
Moderator
Аватара пользователя

Зарегистрирован: Чт май 04, 2006 00:53
Сообщения: 5062
Откуда: был Крым, теперь Новосибирск
Благодарил (а): 23 раз.
Поблагодарили: 63 раз.
Валерий писал(а):
Помогите, постараюсь больше по пустякамне тревожить.

это не проблема 8) обычно как раз самые сложные проблемы понимания в пустяках и находятся 8)


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Чт янв 25, 2007 18:39 
Не в сети

Зарегистрирован: Чт янв 25, 2007 15:29
Сообщения: 7
Благодарил (а): 0 раз.
Поблагодарили: 0 раз.
Благодарю Вас. Кстати, Ваше ядро я просмотрел, пока не понял, но уважение вызывает. Немного напутано в Docs, но придется мириться с техническим языком. Еще раз спасибо.

_________________
Новичок


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Чт янв 25, 2007 18:53 
Не в сети
Moderator
Moderator
Аватара пользователя

Зарегистрирован: Чт май 04, 2006 00:53
Сообщения: 5062
Откуда: был Крым, теперь Новосибирск
Благодарил (а): 23 раз.
Поблагодарили: 63 раз.
Валерий писал(а):
Благодарю Вас. Кстати, Ваше ядро я просмотрел, пока не понял, но уважение вызывает.


за комплимент спасибо
начинать с моего варианта пока точно не стоит, так как все в процессе. И там не все работает.


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Чт янв 25, 2007 19:16 
Не в сети

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


Идею Форта врят-ли можно постичь из документации, т.к.
Форт не имеет конкретного назначения. Проще всего
разобраться с исходными текстами конкретной форт-системы.
http://fforum.winglion.ru/viewtopic.php ... ight=#2736


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Чт янв 25, 2007 19:16 
http://spf.sourceforge.net/docs/intro.ru.html#forget


Вернуться к началу
  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Пт янв 26, 2007 18:32 
Не в сети

Зарегистрирован: Чт янв 25, 2007 15:29
Сообщения: 7
Благодарил (а): 0 раз.
Поблагодарили: 0 раз.
Благодарю всех, кто активно ответил новичку, не стесняясь глупых вопросов. mOleg - Вам удачи в разработке ядра. Научусь - помогу :) Еще вопрос на размышление - есть ли в природе ряд "занимательных" пример и задач для Forth? Интересно практически просмотреть ряд вопросов. Заранее спасибо...

_________________
Новичок


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Пт янв 26, 2007 19:05 
Не в сети

Зарегистрирован: Чт янв 25, 2007 15:29
Сообщения: 7
Благодарил (а): 0 раз.
Поблагодарили: 0 раз.
Тогда всем практический пример - покажите, у кого есть время, код такого проекта:
реализовать команду dir - Windows (ls - UNIX) с последующим выводом данных в текстовый файл и сохранением на винте. Причем при запуске окончательного кода (желательно, конечно exe, а там, как получится) на терминал и на экран ничего не выводится (для простоты). проект запрашивается чисто в ознакомительных целях!!!

_________________
Новичок


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Пт янв 26, 2007 19:20 
Не в сети

Зарегистрирован: Чт май 04, 2006 18:18
Сообщения: 456
Благодарил (а): 0 раз.
Поблагодарили: 1 раз.
Код:
REQUIRE ITERATE-FILES ~profit/lib/iterate-files.f
REQUIRE .R lib/include/core-ext.f
REQUIRE /STRING lib/include/string.f
\ REQUIRE STR{ ~ygrek/lib/strtype.f

: CUT-NAME ( a u -- )
   2DUP
   CUT-PATH NIP
   /STRING ;

: EACH-FILE ( a u data flag -- )
   CR
   SWAP
   nFileSizeLow @ 10 .R
   2 SPACES
   IF S" <DIR> " TYPE ELSE 5 SPACES THEN
   2 SPACES
   CUT-NAME TYPE ;

: dir
  S" ." 1 ITERATE-FILES EACH-FILE ;

:NONAME dir BYE ; MAINX !
S" dir.exe" SAVE
BYE


Вывод на экран. Идеологически неверно делать вывод в файл, т.к. это замечательно делается средствами ОС.

_________________
http://forth.org.ru/~ygrek


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Пт янв 26, 2007 20:18 
Не в сети

Зарегистрирован: Чт май 04, 2006 18:18
Сообщения: 456
Благодарил (а): 0 раз.
Поблагодарили: 1 раз.
немного проще.
и исправил комменты

Код:
REQUIRE FIND-FILES-R ~ac/lib/win/file/findfile-r.f
REQUIRE .R lib/include/core-ext.f
REQUIRE /STRING lib/include/string.f
\ REQUIRE STR{ ~ygrek/lib/strtype.f

\ S" path/to/file/file.ext" CUR-NAME -> S" file.ext"
: CUT-NAME ( a u -- a1 u1 )
   2DUP
   CUT-PATH NIP
   /STRING ;

: EACH-FILE ( a u data flag -- )
   CR
   SWAP
   nFileSizeLow @ 10 .R
   2 SPACES
   IF S" <DIR> " TYPE ELSE 5 SPACES THEN
   2 SPACES
   CUT-NAME TYPE ;

: dir
  1 FIND-FILES-DEPTH !
  S" ." ['] EACH-FILE FIND-FILES-R ;

:NONAME dir BYE ; MAINX !
S" dir2.exe" SAVE
BYE

_________________
http://forth.org.ru/~ygrek


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения:
СообщениеДобавлено: Сб янв 27, 2007 00:43 
Не в сети

Зарегистрирован: Чт май 04, 2006 18:18
Сообщения: 456
Благодарил (а): 0 раз.
Поблагодарили: 1 раз.
Валерий писал(а):
Благодарю всех, кто активно ответил новичку, не стесняясь глупых вопросов. mOleg - Вам удачи в разработке ядра. Научусь - помогу :) Еще вопрос на размышление - есть ли в природе ряд "занимательных" пример и задач для Forth? Интересно практически просмотреть ряд вопросов. Заранее спасибо...


Специально для форта я не знаю, и особого смысла не вижу. А просто задачек так полно :)
Например http://www.pythonchallenge.com/

_________________
http://forth.org.ru/~ygrek


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

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


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

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


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

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