Forth и другие саморасширяющиеся системы программирования Locations of visitors to this page
Текущее время: Чт мар 28, 2024 21:15

...
Google Search
Forth-FAQ Spy Grafic

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




Начать новую тему Ответить на тему  [ Сообщений: 122 ]  На страницу Пред.  1, 2, 3, 4, 5, 6, 7 ... 9  След.
Автор Сообщение
 Заголовок сообщения:
СообщениеДобавлено: Ср апр 07, 2010 00:04 
Не в сети
Аватара пользователя

Зарегистрирован: Пт дек 26, 2008 21:16
Сообщения: 412
Откуда: Великий Новгород
Благодарил (а): 9 раз.
Поблагодарили: 4 раз.
mOleg писал(а):
тут лучше подумать над синтаксисом аккуратно.

Эт точно...
А вот так :
Код:
s" \Dir\...."  rel-path:  MyRelativPath/

Строка естествено относительный путь.


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: Re: баг-не-баг, но неприятность
СообщениеДобавлено: Чт апр 29, 2010 19:20 
Не в сети
Аватара пользователя

Зарегистрирован: Пт дек 26, 2008 21:16
Сообщения: 412
Откуда: Великий Новгород
Благодарил (а): 9 раз.
Поблагодарили: 4 раз.
Ну вот до чего я дошел ;)
Код:

\ Это файл C:\hlib\relpath.fts


\ Получить путь из входного потока
: path/  ( name/ -- asc # ) ParseFileName CUT-PATH ; \ тут можно еще и проверку пути устроить

\ Объеденить имя из входного потока с путем из строки
: &FileName/ ( asc # file.ext/  -- asc # ) ParseFileName <# HOLDS  HOLDS #} path>/ ;

\ Создать слово подключающее file-name  по относительному пути
\ текущий_путь & относительный_путь_заданый_строкой
: rel-path: ( asc # file-name/ -- ) <# HOLDS SOURCE-NAME CUT-PATH HOLDS #}
            : SLIT, COMPILE &FileName/ COMPILE Requires [COMPILE] ; ;


Вот как теперь выглядит файл путей С:\hlib\ways.fts

Код:
GET-CURRENT
ALSO ROOT DEFINITIONS

С:\hlib\relpath.fts  \ тут пока абсолютный путь


       0 0          rel-path: h/           \ это текущуй короткий путь
path/  wnd\         rel-path: hwnd/
path/  samples\     rel-path: hsamp/


PREVIOUS
SET-CURRENT


Т. е. теперь папка проекта может спокойно лежать где ее положили
и открываться из любой версии форка достаточно в fork.ini прописать путь к ways.fts.
Помоему удобно ?
Глюков тоже пока не обнаружилось.

mOleg Если захочешь добавить в сборку relpath.fts отдам безвомездно тоесть даром ;)


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

Зарегистрирован: Чт май 04, 2006 00:53
Сообщения: 5062
Откуда: был Крым, теперь Новосибирск
Благодарил (а): 23 раз.
Поблагодарили: 63 раз.
интересно, однако надо добавить path>/
если хочеться, чтобы \name\file.ext и /name/file.ext не посчиталось за две разных либы

вобщем, буду думать.

_________________
Мне бы только мой крошечный вклад внести,
За короткую жизнь сплести
Хотя бы ниточку шёлка.
fleur


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: Re: баг-не-баг, но неприятность
СообщениеДобавлено: Чт апр 29, 2010 19:37 
Не в сети
Аватара пользователя

Зарегистрирован: Пт дек 26, 2008 21:16
Сообщения: 412
Откуда: Великий Новгород
Благодарил (а): 9 раз.
Поблагодарили: 4 раз.
mOleg писал(а):
интересно, однако надо добавить path>/
если хочеться, чтобы \name\file.ext и /name/file.ext не посчиталось за две разных либы

вобщем, буду думать.

А ты его проглядел всмысле path>/
Он в конце &FileName и стоит т.е. перед Requires как раз сработает

P.S.
Хм... а может path>/ прямо в начало Requires всунуть стоит ????


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

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

да, действительно 8(

_Harry писал(а):
Хм... а может path>/ прямо в начало Requires всунуть стоит ????

я думал над этим и решил, что не стоит.
Собственно, слово само по себе полезно - это раз.
А во-вторых, придется перетаскивать слова между либами ;) что несколько уже поднадоело. Кстати, это достаточно неприятная проблема, приходтся потом смотреть и править все ссылающиеся либы.

_________________
Мне бы только мой крошечный вклад внести,
За короткую жизнь сплести
Хотя бы ниточку шёлка.
fleur


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: Re: баг-не-баг, но неприятность
СообщениеДобавлено: Чт апр 29, 2010 21:57 
Не в сети
Аватара пользователя

Зарегистрирован: Пт дек 26, 2008 21:16
Сообщения: 412
Откуда: Великий Новгород
Благодарил (а): 9 раз.
Поблагодарили: 4 раз.
mOleg писал(а):
Кстати, это достаточно неприятная проблема, приходтся потом смотреть и править все ссылающиеся либы.

Угу ... понятно, а их уже много накопилось


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: Re: баг-не-баг, но неприятность
СообщениеДобавлено: Пт апр 30, 2010 11:16 
Не в сети
Аватара пользователя

Зарегистрирован: Пт дек 26, 2008 21:16
Сообщения: 412
Откуда: Великий Новгород
Благодарил (а): 9 раз.
Поблагодарили: 4 раз.
_Harry писал(а):
Т. е. теперь папка проекта может спокойно лежать где ее положили
и открываться из любой версии форка достаточно в fork.ini прописать путь к ways.fts.
Помоему удобно ?


А лучше даже не так.
Так как пути относительные то удобно иметь главный файл проекта и где то в начале
его подключать файл путей тогда и всю папку проекта можно будет перемещать/копировать как угодно
запускаться же будет этот главный файл, в fork.ini ничего указывать не надо ( ну в смысле путей проекта )


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: Re: баг-не-баг, но неприятность
СообщениеДобавлено: Пт апр 30, 2010 12:14 
Не в сети
Moderator
Moderator
Аватара пользователя

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

Файл инициализации подключается либо из текущей папки, либо, если не найден из той папки, где лежит исполнимый файл.
Это значит, что каждый проект может иметь собственный файл инициализации.

_________________
Мне бы только мой крошечный вклад внести,
За короткую жизнь сплести
Хотя бы ниточку шёлка.
fleur


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: Re: баг-не-баг, но неприятность
СообщениеДобавлено: Пт апр 30, 2010 12:53 
Не в сети
Аватара пользователя

Зарегистрирован: Пт дек 26, 2008 21:16
Сообщения: 412
Откуда: Великий Новгород
Благодарил (а): 9 раз.
Поблагодарили: 4 раз.
mOleg писал(а):
Файл инициализации подключается либо из текущей папки, либо, если не найден из той папки, где лежит исполнимый файл.
Это значит, что каждый проект может иметь собственный файл инициализации.


Да запускать fork из текущей папки я не пробовал.
Обычно запускаю fork.exe из его родной папки тогда сначала транслируется fork.ini в корне сборки
а уж потом то что я ему подсуну в командной строке или еще как нибудь.

Если запускать из текущей папки файл путей проекта имеет смысл как раз в этот индивидуальный ini и поместить.
В любом случае относительные короткие пути добавляют удобства.
(Глюки пытаюсь найти но пока не нашел)

Тут еще мысль возникает завести еще и абсолютные короткие пути.
Хотя непонятно надо ли оно

И еще не очень здорово то что при трасляции fork.ini c ошибками окно закрывается без всяких объяснений.
Это не сильно но напрягает.


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: Re: баг-не-баг, но неприятность
СообщениеДобавлено: Пт апр 30, 2010 14:00 
Не в сети
Moderator
Moderator
Аватара пользователя

Зарегистрирован: Чт май 04, 2006 00:53
Сообщения: 5062
Откуда: был Крым, теперь Новосибирск
Благодарил (а): 23 раз.
Поблагодарили: 63 раз.
_Harry писал(а):
И еще не очень здорово то что при трасляции fork.ini c ошибками окно закрывается без всяких объяснений.Это не сильно но напрягает.

mOleg kernel fork(mOlegg@ya.ru). build from SPF4.17 sources
windows Version 4.10 Build 297 at 10.Apr.2010


Источник: fork.ini
В строке: 1 :12
zzzzzzzzzzzzz
Ошибка: Данное имя в контексте не найдено!
ошибка во время инициализации системы!


вобщем, возьми последнюю сборку.
С другой стороны, сообщение может не быть показано, если в корне не будет файла fork.msg

_________________
Мне бы только мой крошечный вклад внести,
За короткую жизнь сплести
Хотя бы ниточку шёлка.
fleur


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: Re: баг-не-баг, но неприятность
СообщениеДобавлено: Пт апр 30, 2010 14:02 
Не в сети
Moderator
Moderator
Аватара пользователя

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

по большому счету надо тест сделать, чтобы не искать руками, а автоматически контролировать потом.

да, а с твоим предложением на выходных разберусь (сейчас голова забита и работать не хочет).

_________________
Мне бы только мой крошечный вклад внести,
За короткую жизнь сплести
Хотя бы ниточку шёлка.
fleur


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: Re: баг-не-баг, но неприятность
СообщениеДобавлено: Пт апр 30, 2010 14:42 
Не в сети
Аватара пользователя

Зарегистрирован: Пт дек 26, 2008 21:16
Сообщения: 412
Откуда: Великий Новгород
Благодарил (а): 9 раз.
Поблагодарили: 4 раз.
mOleg писал(а):
вобщем, возьми последнюю сборку.

Здорово не успел я предложить а оно вот оно

mOleg писал(а):
С другой стороны, сообщение может не быть показано, если в корне не будет файла fork.msg

Думаю в этом случае форк должен отругать :dmad; на чем свет стоит того хто похитил его любимый fork.msg :D


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: Re: баг-не-баг, но неприятность
СообщениеДобавлено: Пт апр 30, 2010 15:41 
Не в сети
Аватара пользователя

Зарегистрирован: Пт дек 26, 2008 21:16
Сообщения: 412
Откуда: Великий Новгород
Благодарил (а): 9 раз.
Поблагодарили: 4 раз.
mOleg писал(а):
вобщем, возьми последнюю сборку.

И где ????
:hey; В обычном месте новоя сборка не обнаруженна :<


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: Re: баг-не-баг, но неприятность
СообщениеДобавлено: Пт апр 30, 2010 16:20 
Не в сети
Moderator
Moderator
Аватара пользователя

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

последняя эта: src4-mc10-b289@31.03.2010.zip

_Harry писал(а):
Думаю в этом случае форк должен отругать на чем свет стоит того хто похитил его любимый fork.msg

он так и делает, ругается так:
Ошибка: 536870941

_________________
Мне бы только мой крошечный вклад внести,
За короткую жизнь сплести
Хотя бы ниточку шёлка.
fleur


Вернуться к началу
 Профиль Отправить личное сообщение  
Ответить с цитатой  
 Заголовок сообщения: Re: баг-не-баг, но неприятность
СообщениеДобавлено: Пт апр 30, 2010 16:32 
Не в сети
Аватара пользователя

Зарегистрирован: Пт дек 26, 2008 21:16
Сообщения: 412
Откуда: Великий Новгород
Благодарил (а): 9 раз.
Поблагодарили: 4 раз.
mOleg писал(а):
последняя эта: src4-mc10-b289@31.03.2010.zip

Ну так уменя эта и есть она молча закрывается что-то не так :roll:

_Harry писал(а):
Думаю в этом случае форк должен отругать на чем свет стоит того хто похитил его любимый fork.msg

он так и делает, ругается так:
Ошибка: 536870941
Та шож это за ругательства слишком интелегентно :lol:


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

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


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

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


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

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