Ответы в темах
-
Сообщения
-
Доступ по сети хотя бы к хосту… Про другие потом… И вообще у меня ощущение, что с этим линуксом, как и со всеми у меня. Я его быстро сломал, теперь машина что-то не запускается…
Переустановил, но с сетью пока не получается, хотя Интернет есть. А что-нибуль типа Total Commander там есть? Или поставить что можно?
Нашел, но там старая версия. И что-то сеть не работает. Как ее теперь обновить? Иногда система требует пароль…
Обе машины не запустились в VmWare, хотя формат поддерживается. В VirtualBox запустились обе, но OS/2 сообщила о проблеме с правами на некую папку. Linux запустился, но там я пока не нашел IS. На сегодня все..
Если нетрудно — повторите тут ссылки — обещаю, на выходных проверю.
А что у IS экзешников ограничение на 4Гб? Они сами 32 бит?
И он точно не поддерживает d и q форматы. Я искал, но нашел этого…Для проверки secs:
testsecs: proc options (main);
/* Iron Spring does not support builtin function sces */
dcl (secs, sin) builtin, sysprint file output print, i fixed, x float,
start float bin(53);start = secs();
x = 5.0e0;do i = 1, 10000;
x = sin(i*x);
end;put list (‘time: ‘, decimal(secs()-start), ‘ seconds’);
end testsecs;
Аналогично, для проверки FREE
testfree: proc options (main);
/* Iron Spring does not accept free with more than one variable */
dcl (a(n,n), b(n)) float ctl, n fixed;
n=2;allocate a, b;
free a, b;end testfree;
Давайте тогда набирать баг-репорты. Вот чуть отредактированный по put data.
Можете скомпилировать его с максимальных числом отладочных опций?
Результаты вышлю Питеру.testputdata: proc options (main);
/* Iron Spring does not like put data; but it accept IBM compiler, and
IBM compiler does not accept put data(); and Iron Spring accept it,
but outputs nothing.
*/
dcl (a,b,c)float, i fixed, sysprint file output print;
a=1;
b=2;
c=3;
i=4;
put skip edit(‘put data()————————‘)(a);
put skip data();
/*
put skip data;
*/
put skip edit(‘put data(a, b, c, i)—————‘)(a);
put skip data(a,i);
end testputdata;Еще необходимые доработки.
1. F.A.Q по типу Робина, но, наверное, поменьше размером, как отдельный раздел.2. Чтобы дату и время последнего комментария и новости было видно на главной странице. Смысл — набрал pl1.su, и, больше ничего не выбирая, сразу видишь, добавилось что-нибудь или нет. А то комментарии слишком глубоко оказываются закопаны, но главное — свежий комментарий надо в списке тем искать.
3. При размещении комментария (вроде только на форуме, но надо проверять), подписчикам уходит извещение (прошу подтвердить, приходит ли?). Оно уходит и в адрес noreplay@pl1.su (такой ящик специально заведен) и в этом случае плагин Post SMTP выдает ошибку в виде двух писем на admin@pl1.su с темой «https://pl1.su: Вставьте сюда сообщение об ошибке SMTP» и абракадаброй из которой можно вычленить лишь «Unable to authenticate at present» и «Unknown recipient»
Спасибо, посмотрел. Действительно, когда есть много отложенных (нереализованных пока) возможностей, он падает на втором проходе.
Из непонятных мне ошибок:
1. Оператор free
allocate a;
allocate a, b;
free a;
принимает, а вот
free a, b;
не принимает:
635 FREE YK0RC, PYK0RC, JK0RC, PJK0RC;
636 (ERR222)Invalid syntax in FREE statement at «YK0RC,PYK0RC,JK0RC,PJK0RC».
636 (INF249)-input flushed to next «;».
а вот это место непонятно вообще тут принимает?
808 IF N2^=0B THEN
809 FREE JJ1A, YY1A, JJD, YYD, PJ1A, PY1A, DJ1A, PDJ1A, DY1A, PDY1A,
810 PJD, PYD;
811 (ERR222)Invalid syntax in FREE statement at «JJ1A,YY1A,JJD,YYD».
811 (INF249)-input flushed to next «;».
811 IF KEYW THEN FREE JJA, YYA, PJA, PYA, DJA, PDJA, DYA, PDYA;
812
813 (ERR222)Invalid syntax in FREE statement at «JJA,YYA,PJA,PYA».
813 (INF249)-input flushed to next «;».
Или это все следствие комплексности некоторых массивов?
2. PUT DATA
оператор put data; не принимает, хорошо бы проверить, примет ли put data();
3. Непонятно, почему не нравится:
479 (ERR208)Unrecognized keyword GMS.
479 LOCATE GMS FILE(F1) SET(PR);
и сообщение тоже противоречивое
4. Не поддерживается встроенная функция secs
5. Не нравится некрасивое, но нормальное объявление:
62 DCL(M INIT(1d10),M1 INIT(1e-10),X00 INIT(1e-20),X0I INIT(18.0e0),
63 X0K1 INIT(1.5e0),X0K2 INIT(17.5e0),E1 INIT(1.0e-17),
64 PI INIT(3.14159265358979324e0),D(5),A,B,C,T,H,A1,AX,Z,GM,S,X1,X2,
65 QN,QC,I1,I0,K1,K0,BX,DX,B0,B1,B2,B3,B4,C0,$,#,#0,#2,#3,#4,#8,
62 (ERR222)Invalid syntax in INITIAL list at «1 D10».
6. То же странно:
10 DCL S(0:59) CHAR(80) VAR CONNECTED;
10 (ERR254)Invalid attribute CONNECTED.
11 S( 0)=’P E З У Л Ь T A T Ы P A C Ч E T A’;
12 S( 1)=’PACЧET ПAPAMETPOB ЦИЛИHДPИЧECKOЙ AHTEHHOЙ PEШETKИ’;
13 S( 2)=’ЧИCЛO ЭЛEMEHTOB (CEKTOPИAЛЬHЫX BOЛHOBOДOB) B ПEPEДAЮЩEЙ’;
и потом:
11 (INF684)Array argument for S assumed to be CONNECTED.
12 (INF684)Array argument for S assumed to be CONNECTED.
13 (INF684)Array argument for S assumed to be CONNECTED.
Надо будет собрать и послать. Если у Вас что-нибудь есть — шлите — я отработаю.Странно, я думал, что он выводит соодщения типа «не поддерживается пока или постоянно».
Я послал Вам по почте проект для тетирования. Если нетрудно и будет время потестируйте, пожалуйста его с IS. Ну, и результаты мне пришлите.Так давайте вышлем ему эти ошибки. Так и нам лучше, и ему стимул. Если Вам неудобно, я без проблем могу перевести и послать.
Есть простой способ «табуляции», как говорится, «элементарно, Ватсон!»
Ставим нужное число точек и закрашиваем их под цвет страницы))))
Посмотрите как получилось в статье «О размещение переменных в стеке»