Фортран, Смысл унарного * оператора в вызовах функций?

Question

Фортран, Смысл унарного * оператора в вызовах функций?

Я пытаюсь внести изменения в старый код Fortran, чтобы он обрабатывал немного другой двоичный формат входного файла. В процессе этого я сталкивался * использовался в одинарной манере. Например, этот код находится в цикле:

          CALL EVENT1(QDRBUF(IPNTR+EVTHSZ),EVTSIZ,EVTID,                
     -                                            *11000,*10000,*80000)

Есть и другие случаи, но, насколько я видел / помню, это только в вызовах функций. Что это делает?

1

syntax fortran fortran77 unary-operator

Источник

user60483 18 дек '14 в 22:18

1 ответ

Решение

Другие вопросы по тегам syntax fortran fortran77 unary-operator

user10077 19 дек '14 в 04:08 2014-12-19 04:08 · Accepted Answer · 2014-12-19 04:08

Я не парень из Фортрана, но этот вопрос заинтриговал меня, поэтому я немного посмотрел. Похоже, что это альтернативный указатель возврата. Число после звездочки - это метка, которую можно использовать вместо обычного возврата, почти как при перехвате исключения.