Forth
http://fforum.winglion.ru/

`ERROR #87
http://fforum.winglion.ru/viewtopic.php?f=18&t=2673		 Страница 2 из 2
Автор:  oco [ Ср окт 27, 2010 16:36 ]
Заголовок сообщения:  Re: `ERROR #87
В SPF 4.19.001 такой ошибки нет, проверил.
Автор:  mOleg [ Ср окт 27, 2010 16:44 ]
Заголовок сообщения:  Re: `ERROR #87
очень интересно.
По крайней мере видно, что файлы таки умеют подключаться 8)
Вероятно какая-то виндошная функция несколько иначе интерпретирует параметры.

А ошибка однозначно системная.
Автор:  mOleg [ Ср окт 27, 2010 17:06 ]
Заголовок сообщения:  Re: `ERROR #87
Пока могу посоветовать взять SPF версии 3.7
Автор:  oco [ Ср окт 27, 2010 17:08 ]
Заголовок сообщения:  Re: `ERROR #87
mOleg писал(а):
очень интересно.
По крайней мере видно, что файлы таки умеют подключаться 8)

Да нет, в 4.20 ничего не подключается
А в форке все собирается spf Version 4.00 Build 025 at 22.Mar.2009
Автор:  oco [ Ср окт 27, 2010 17:09 ]
Заголовок сообщения:  Re: `ERROR #87
mOleg писал(а):
Пока могу посоветовать взять SPF версии 3.7

SPF 4.19 работает
Автор:  Mihail [ Ср окт 27, 2010 17:15 ]
Заголовок сообщения:  Re: `ERROR #87
oco писал(а):
SPF 4.19 работает

Для выявления бага, я частенько пользуюсь нудным, но надежным способом.
Постепенно перевожу работающую версию в неработающую.
Автор:  oco [ Ср окт 27, 2010 17:31 ]
Заголовок сообщения:  Re: `ERROR #87
К сожалению, не могу даже собрать (в целях отладки) СПФ 4.20:
Код:
Wait a bit while compiling...

No src/compile.ini - using defaults
Build options :
     CREATE-XML-HELP : FALSE
             ARCH-P6 : FALSE
     BUILD-OPTIMIZER : TRUE
       USE-OPTIMIZER : TRUE
    OPTIMIZE-BY-SIZE : FALSE
           WIDE-CHAR : FALSE
    UNIX-ENVIRONMENT : FALSE
        TARGET-POSIX : FALSE

Base address of the image 0x552000
Dummy B, B@ B! and /CHAR
=============================================================
Done. Saving the system.
=============================================================


DONEException #87 at: H-STDIN:0:4:
DONE
  ^ ERROR #87
Автор:  in4 [ Ср окт 27, 2010 17:32 ]
Заголовок сообщения:  Re: `ERROR #87
Была наведенная ошибка. Сообщение можно удалить.
Автор:  Mihail [ Ср окт 27, 2010 17:47 ]
Заголовок сообщения:  Re: `ERROR #87
oco писал(а):
К сожалению, не могу даже собрать (в целях отладки) СПФ 4.20:


Достаточно чтобы собиралась SPF 4.19 .
СПФ 4.20 используется в качестве образца.
Из СПФ 4.20 постепенно переносишь отличающиеся фрагменты в SPF 4.19 (в копию) и
проверяешь на собираемость, на работоспособность.
Автор:  oco [ Ср окт 27, 2010 17:51 ]
Заголовок сообщения:  Re: `ERROR #87
Разобрался!
В файле src\win\spf_win_io.f
Код:
: OPEN-FILE-SHARED ( c-addr u fam -- fileid ior )
  NIP SWAP >R >R
  0 FILE_ATTRIBUTE_ARCHIVE ( template attrs )
  OPEN_EXISTING
  SA ( secur )
  7 ( share )
  R> ( access=fam )
  R> ( filename )
  CreateFileA DUP -1 = IF GetLastError ELSE 0 THEN
;

нужно поменять 7 на 3.
Это режим общего доступа к файлу, сумма FILE_SHARE_READ = 1, FILE_SHARE_WRITE = 2 и FILE_SHARE_DELETE = 4
Причем последнее в Windows98 не поддерживается.
Нужна или условная компиляция в зависимости от ОС или просто 3 оставить, должно и в ХР работать.
Автор:  in4 [ Ср окт 27, 2010 18:43 ]
Заголовок сообщения:  Re: `ERROR #87
Кто баг запишет в Багтрекер?
Автор:  oco [ Чт окт 28, 2010 17:45 ]
Заголовок сообщения:  Re: `ERROR #87
Кстати, куда делся файл spf.err? В 4.17 он еще присутствует, в 4.18, 4.19, 4.20 - нет.
Автор:  in4 [ Пт окт 29, 2010 01:07 ]
Заголовок сообщения:  Re: `ERROR #87
oco писал(а):
Кстати, куда делся файл spf.err? В 4.17 он еще присутствует, в 4.18, 4.19, 4.20 - нет.
Надо скопировать из \SPF\lib\SPF.ERR
Автор:  ac [ Сб ноя 06, 2010 17:38 ]
Заголовок сообщения:  Re: `ERROR #87
in4 писал(а):
Кто баг запишет в Багтрекер?

Рувим записал. Предлагаемый вариант решения см. https://sourceforge.net/tracker/index.p ... tid=117919
Страница 2 из 2 Часовой пояс: UTC + 3 часа [ Летнее время ]
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/