Fortran, значение оператора Unary * в вызовах функций?

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

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

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


syntax fortran fortran77 unary-operator
person James Matta    schedule 18.12.2014    source источник
comment
возможный дубликат оператора возврата Fortran   -  person Alexander Vogt    schedule 19.12.2014
comment
Я бы сказал, что это одна и та же тема, но не дублирующий вопрос.   -  person Vladimir F    schedule 19.12.2014
comment
Согласен с Владимиром. Ответы на вопрос, который вы предлагаете дублировать, действительно отвечают на мой вопрос, но сам вопрос не дублируется. Их вопрос касается оператора return, мой — вызова функции. Как сказал Владимир, в той же теме другой вопрос.   -  person James Matta    schedule 20.12.2014

Ответы (1)


arrow_upward
3
arrow_downward

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

person Fred Larson    schedule 19.12.2014
comment
Спасибо, большая часть моего кода написана на cpp и python, поэтому в редких случаях, когда я работаю с кодом на фортране, некоторые аспекты синтаксиса иногда заставляют меня остановиться, так как я даже не знаю, как их назвать при поиске в Интернете. Мне даже не приходило в голову, что люди могут помещать то, что фактически является метками перехода, в качестве параметров функции. Еще раз спасибо. - person James Matta; 20.12.2014
comment
Это верно. Вы добавляете число (1, 2 и т. д.) в оператор RETURN, чтобы указать, с какого из альтернативных номеров операторов (не номеров строк) управление возобновляется при возврате. - person zarchasmpgmr; 20.12.2014