По роду работы пытаюсь освоить gt.m но что то пока получается не очень.

Например есть код:prog4
        s i=0
        f  q:i=20  d  
        . s i=i+1
        . w !,i
        . q:i=10
        w !
        q
После "d" идёт два пробела!
Этот код компилируется без ошибок, а вот если после "f  q:i=20" поставить один пробел вместо двух, то уже при компиляции выдаёт ошибку. Почему не понятно, я ведь после for поставил два пробела - бесконечный цикл, поэтому насколько я понял после строки "f  q:i=20" можно ставить один пробел. Или это не так?

Потом следующий момент. Если убрать "q:i=20" и написать " f  d   " то хоть ставь в теле цикла выход по условию (q:i=10) хоть не ставь всё равно не выйдешь, надо для выхода писать вот так "f  q:i=20  d" Я так понял что в теле цикла если ставить выход то он не действует. так это или я ошибаюсь?

Далее есть вот такой код:prog3
        s i=0
        i i=0 d  
        . s i=i+1
        . w !,i
        . s i=i+1
        . w !,i
        . s i=i+1
        . w !,i
        . s i=i+1
        . w !,i
        . s i=i+1
        . g:i=5 met1
        . w !,i
        . s i=i+1
        . w !,i
        . s i=i+1
        . w !,i
        . s i=i+1
        . w !,i
        . s i=i+1
        e  d..
        . w !,i
        . s i=i+1
        . w !,i
        . s i=i+1
        . w !,i
        . s i=i+1
met1    w !,i
После "d" в строке "i i=0 d   " два пробела.

Результатом работы этой программы будет:


Вопрос, откуда появилась вторая пятёрка?? Одна пятёрка должна быть, но откуда вылезла вторая?

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

DAiMor, Огромное спасибо за помощь!

Ещё хочу уточнить некоторые детали.
Если я запускаю свою программу d ^prog4 и втеле цикла у меня команда quit по которой я получается выхожу из программы prog4 но при этом остаюсь в цикле и он выполняется...?? Я не пойму как это. Если я выйду из программы то всё что в ней выполнялось должно прекратиться, или это не так? Что то этот момент я не пойму.
DAiMor можете объяснить поподробней.

Виталийv4567,

Что то этот gt.m очень какой то запутанный.
По поводу цикла, я так понял что само тело цикла будет запущено как подпрограмма и по quit я выхожу из этой подпрограммы - то есть из цикла, но при этом сам цикл продолжает выполняться. Что то я совсем не пойму как это?

По поводу двух пятёрок. Тело if и else запускаются то же как подпрограммы и когда по goto я выпрыгиваю из этой подпрограммы и когда заканчивается программа prog3 я обратно возвращаюсь в тело if но так как я раньше выпрыгнул из него то оно должно закончиться и я опять из него выхожу на строку которая идёт за телом if, else, а это как раз и есть метка met1. Это так? Получается что если выпрыгеуть по goto не из тела if, else, а из запущенной программы то когда она закончиться всё равно будет возврат туда откуда выпрыгнул?

DAiMor, извини что надоедаю, но мне надо разобраться. Просто работа будет связанна с gt.m, а не разобравшись работать не смогу.

Получается что я вышел из подпрограммы, но подпрограмма это и есть тело цикла или тело if, else. получается что я вышел из цикла или if, else и должен выполнять то что идёт за циклом или if, else и больше к циклу или if, else не возвращаться, а я получается возвращаюсь. В цикле вообще возвращаюсь всё время, а в if, else один раз.

Виталийv4567,

С вызовом по do подпрограмм написанных в других файлах как то всё укладывается в мою логику, а вот с for, if, else не могу разобраться.

Получается если подпрограмма вызвана по do то она отработает полностью или до первой встречи quit, а потом продолжится выполнение программы из которой была вызвана эта подпрограмма.
Пока не пойму как это привязать к for, if, else.

П.С.М.,

это понятно, но в моём случае после do нет названий подпрограмм, после do стоит два пробела что указывает на то что вызывается подпрограмма - тело цикла. Насколько я понял (может я конечно ошибаюсь!) do с двумя пробелами и будет означать что вызывается подпрограмма которая и есть само тело цикла и если я вышел из неё то вышел и из тела цикла - получается что из цикла и должен продолжить выполнение того что написано после тела цикла то есть строки без точек. А получается что выхода никакого нет.

Виталийv4567,

DAiMor я своё последнее сообщение написал перед тем как прочёл твоё последнее сообщение.

Виталийv4567,

сейчас ещё попробую поэкспериментировать.

П.С.М.,

С goto кажись разобрался.
В Си нельзя выпрыгнуть из одной подпрограммы в другую. В рамках одной подпрограммы прыжок не противоречит логики. Я прыгаю на какую нибудь строку с кодом и дальше выполняю всё с этой строки не возвращаясь больше никогда к месту с которого прыгнул. В gt.m если прыгать в пределах одной подпрограммы то то же так, а вот если прыгать из одной подпрограммы в другую (что в Си невозможно) то тогда всё по другому, закончатся строки кода в подпрограмме со строки куда я прыгнул и я вернусь к месту вызова подпрограммы из которой выпрыгивал и опять пойду выполнять строка за строкой код до самого конца первой подпрограммы.

П.С.М.,

да я раньше не мог понять почему так ругают goto. Мне казалось наоборот goto помогает.
(Кстати если посмотреть на условия if, else и циклы на уровне ассемблера, то в начале будет проверка условия, а потом в зависимости как это условие выполнилось прыжок на определённый адрес, а если это цикл то ещё прыжок обратно и это столько раз, сколь итераций цикла. )
Если бы при прыжке из одной подпрограммы в другую не было возврата в место где начала выполняться вызванная подпрограмма (выпрыгнули из подпрограммы и забыли про неё и место где она была вызвана, что к ней возвращаться мы для этого и выпрыгиваем из неё, что бы начать выполнение совсем другого кода) то тогда бы goto не был бы так запутан, а наоборот было бы всё понятно и goto был бы только в помощь.

Alexey Maslov,

Эту книгу купила организация, я её сейчас читаю и пробую на примерах маленькие куски кода.

У меня в программировании очень небольшой опыт, но всё равно были моменты в которых приходилось использовать бесконечные циклы с возможными вариантами - (по условиям) выхода из него. Может это конечно не правильно так как есть опасность сделать ошибку и программа при исполнении уйдёт в бесконечный цикл, что приведёт к её зависанию. Но иногда надо выпрыгнуть и из цикла с конечным числом итераций, а как это сделать не понятно. В книге написано:
"Если при выполнении команды GOTO действовал контекст цикла, то он отменяется. Контекст стека полностью сохраняется. Вызываемый код может вызвать команду quit, которая вернёт управление."
То есть мы вернёмся обратно в цикл. К goto вставленной в одной строке for обращение идёт только после выполнения всех строк в блоке за одну итерацию, а как быть если необходимо провести проверку и выйти по условию в середине блока.
По книге получается что выйти можно, но только когда будет команда quit опять будет возврат на следующую строку в этом блоке откуда вышел, а если надо выйти без возврата, то как быть тогда.
Например такой код:prog7
        f i=0:1:10 d..
        . w !,i
        . g:i=5 met1
        w !,"1111"
met1    w !,"2222"
        qДаёт такой результат: По quit всё равно вернулись в цикл.

Как быть в таком случае?

Вот такой код работает как задумывалось:prog7
        f i=0:1:10 g:i=5 met1 d..
        . w !,i
        w !,"1111"
met1    w !,"2222"
        qВот результат: Вроде бы всё правильно, но это когда условие выполняется в результате прохождения всех строк в блоке.

Например вот такой код надо выйти в середине цикла и больше в цикл не возвращаться:prog7
        f i=0:1:10 d..
        . w !,i
        . s i=i+1
        . w !,i
        . s i=i+1
        . w !,i
        . s i=i+1
        . w !,i
        . s i=i+1
        . w !,i
        . s i=i+1
        . w !,i
        . g:i=5 met1
        . s i=i+1
        . w !,i
        w !,"1111"
met1    w !,"2222"
        qВыйти на совсем не получается, мы возвращаемся, вот результат: Такой вариант то же не помогает:prog7
        f i=0:1:10 g:i=5 met1 d..
        . w !,i
        . s i=i+1
        . w !,i
        . s i=i+1
        . w !,i
        . s i=i+1
        . w !,i
        . s i=i+1
        . w !,i
        . s i=i+1
        . w !,i
        . s i=i+1
        . w !,i
        w !,"1111"
met1    w !,"2222"
        qВот результат: Как быть в данном случае?
В Си выпрыгнул и всё, а в MUMPS не понятно как это осуществить.

После "d" две точки - это два пробела. У меня в редакторе они точками другого цвета пишутся, когда копировал получилось что скопировалось точками.