Вот текст:prog3   s i=0,per=12
experem(per)    s i=i+1
        w i," ",per,!
        q:(i=10)
        d experem(per)
        ;
файл с программкой называется prog3.m

компилирую командой:

zl "prog3"

при компиляции ошибок не выдаёт и файл prog3.o получается

запускаю командой:

d ^prog3

и получаю:


если немного изменить программку:prog3   s i=0,per=12
experem s i=i+1
        w i," ",per,!
        q:(i=10)
        d experem
        ;
написав не experem(per), а experem

то всё компилируется без ошибок и исполняется без ошибок.
В результате выполнения получаю:


И ещё один вопрос.

после неудачного компилирования и выполнения первого варианта, если пытаюсь скомпилировать второй вариант, то получаю такое сообщение:


приходиться выходить и обратно запускать gtm

почему так, как убрать этот активный старый шаблон с компилирования старого варианта prog3?

За помощь заранее благодарен!

Виталийv4567,

если первый скомпилированный вариант запустить вот так:

d prog3^prog3

то выдаёт ту же ошибку.

servit,

prog3  s i=0,per=12
  d experem(per)
  q  ; можно эту команду и опустить
experem(per)
  s i=i+1
  w i," ",per,!
  q:(i=10)
  d experem(per)Да действительно этот код работает.
Непонятно зачем делать вызов функции experem(per) ?

пробовал вот такой код:prog3  s i=0,per=12
  d experem(per)
  q  ; можно эту команду и опустить
experem(per)
  s i=i+1
  w i," ",per,!
  q:(i=10) 0
  d experem(per)теперь функция возвращала значение - этот код не работает, ошибка та же.

по поводу второго вопроса, прочитал по ссылке - не понял почему после неудачного запуска далее не компилируются и не запускаются программки.

Виталийv4567,

In GT.M, the name of the source file determines the name of the GT.M routine. The file name of the object file is not required to match the name of the routine. Linking the object file makes the internal routine name (derived from the source file) known to GT.M. This can lead to potential confusion, however, since both ZLINK and auto-ZLINK use the name of the object file to find the routine. When the object file name differs from the name of the routine, auto-ZLINK generates a run-time error.

Может здесь объяснение по поводу моего второго вопроса, но я ничего не понял.

ну я,

Если компилировать другую программку (правильно написанную), то она нормально компилируется и выполняется. Если попробовать после этого опять скомпилировать первую программку то она не скомпилируется и выдаст всё то же:


Как убрать её из рутины процесса?

И опять по коду.

Я так и не понял почему нельзя выполнить подпрограмму с переданным ей параметром после блока самой этой подпрограммы?
Кстати действительно как писалось ранее если выполнить эту подпрограммку до блока самой этой подпрограммки, то всё компилируется и исполняется без ошибок.

Виталийv4567,

по коду - в трёх книжках ответа не нашёл!

Виталийv4567,

Получается что дело не в том где находится ссылка на подпрограмму, до её кода или после. Просто ссылка с параметром не должна попасть на исполнение.
Вот такой код компилируется без ошибок:prog3
        s i=0,per=12
experem(per)
        s i=i+1
        w i," ",per,!
        q
        ;но не исполняется - выдаёт вот что:

вот такой код то же компилируется но не исполняется:prog3
        s i=0,per=12
        d experem(per)
experem(per)
        s i=i+1
        w i," ",per,!
        q
        ;
первый раз выполнилось - строка d experem(per) а далее когда пришло на ссылку - experem(per) выдало ошибку.

А вот такой код склмпилируется и выполнится без ошибок.prog3
        s i=0,per=12
        d experem(per)
        q
experem(per)
        s i=i+1
        w i," ",per,!
        q
        ;
до ссылки - experem(per) дело не дошло, поэтому не было и ошибок.

Почему ссылка с параметром при исполнении даёт ошибку!

Виталийv4567,

По первому вопросу тему наверное можно закрывать.
Действительно метка с параметрами не должна исполняться в результате поочерёдного исполнения строк кода.
Вот что нашёл в книге:

Если метка была объявлена с параметрами , то на неё нельзя перейти безусловным переходом, поскольку исполняющая машина (интерпретатор) MUMPS не знает как и что сопоставить этим параметрам как локальным переменным нового контекста, при безусловном переходе не создаётся новый контекст или фрейм на стеке.