62 #define mkIOKey(X) FirmkKey(IONAME(X))  macro
71     mkIOKey(BeginInternalArrayListOutput), mkIOKey(BeginInternalArrayListInput),
72     mkIOKey(BeginInternalArrayFormattedOutput),
73     mkIOKey(BeginInternalArrayFormattedInput), mkIOKey(BeginInternalListOutput),
74     mkIOKey(BeginInternalListInput), mkIOKey(BeginInternalFormattedOutput),
75     mkIOKey(BeginInternalFormattedInput), mkIOKey(BeginExternalListOutput),
76     mkIOKey(BeginExternalListInput), mkIOKey(BeginExternalFormattedOutput),
77     mkIOKey(BeginExternalFormattedInput), mkIOKey(BeginUnformattedOutput),
78     mkIOKey(BeginUnformattedInput), mkIOKey(BeginWait), mkIOKey(BeginWaitAll),
79     mkIOKey(BeginClose), mkIOKey(BeginFlush), mkIOKey(BeginBackspace),
80     mkIOKey(BeginEndfile), mkIOKey(BeginRewind), mkIOKey(BeginOpenUnit),
81     mkIOKey(BeginOpenNewUnit), mkIOKey(BeginInquireUnit),
82     mkIOKey(BeginInquireFile), mkIOKey(BeginInquireIoLength),
83     mkIOKey(CheckUnitNumberInRange64), mkIOKey(CheckUnitNumberInRange128),
84     mkIOKey(EnableHandlers), mkIOKey(SetAdvance), mkIOKey(SetBlank),
85     mkIOKey(SetDecimal), mkIOKey(SetDelim), mkIOKey(SetPad), mkIOKey(SetPos),
86     mkIOKey(SetRec), mkIOKey(SetRound), mkIOKey(SetSign),
87     mkIOKey(OutputNamelist), mkIOKey(InputNamelist), mkIOKey(OutputDescriptor),
88     mkIOKey(InputDescriptor), mkIOKey(OutputUnformattedBlock),
89     mkIOKey(InputUnformattedBlock), mkIOKey(OutputInteger8),
90     mkIOKey(OutputInteger16), mkIOKey(OutputInteger32),
91     mkIOKey(OutputInteger64), mkIOKey(OutputInteger128), mkIOKey(InputInteger),
92     mkIOKey(OutputReal32), mkIOKey(InputReal32), mkIOKey(OutputReal64),
93     mkIOKey(InputReal64), mkIOKey(OutputComplex32), mkIOKey(InputComplex32),
94     mkIOKey(OutputComplex64), mkIOKey(InputComplex64), mkIOKey(OutputAscii),
95     mkIOKey(InputAscii), mkIOKey(OutputLogical), mkIOKey(InputLogical),
96     mkIOKey(SetAccess), mkIOKey(SetAction), mkIOKey(SetAsynchronous),
97     mkIOKey(SetCarriagecontrol), mkIOKey(SetEncoding), mkIOKey(SetForm),
98     mkIOKey(SetPosition), mkIOKey(SetRecl), mkIOKey(SetStatus),
99     mkIOKey(SetFile), mkIOKey(GetNewUnit), mkIOKey(GetSize),
100     mkIOKey(GetIoLength), mkIOKey(GetIoMsg), mkIOKey(InquireCharacter),
101     mkIOKey(InquireLogical), mkIOKey(InquirePendingId),
102     mkIOKey(InquireInteger64), mkIOKey(EndIoStatement)>
183         getIORuntimeFunc<mkIOKey(GetIoMsg)>(loc, builder);  in genEndIO()
194       getIORuntimeFunc<mkIOKey(EndIoStatement)>(loc, builder);  in genEndIO()
414     return getIORuntimeFunc<mkIOKey(OutputDescriptor)>(loc, builder);  in getOutputFunc()
418       return getIORuntimeFunc<mkIOKey(OutputLogical)>(loc, builder);  in getOutputFunc()
420       return getIORuntimeFunc<mkIOKey(OutputInteger8)>(loc, builder);  in getOutputFunc()
422       return getIORuntimeFunc<mkIOKey(OutputInteger16)>(loc, builder);  in getOutputFunc()
424       return getIORuntimeFunc<mkIOKey(OutputInteger32)>(loc, builder);  in getOutputFunc()
426       return getIORuntimeFunc<mkIOKey(OutputInteger64)>(loc, builder);  in getOutputFunc()
428       return getIORuntimeFunc<mkIOKey(OutputInteger128)>(loc, builder);  in getOutputFunc()
434       return getIORuntimeFunc<mkIOKey(OutputReal32)>(loc, builder);  in getOutputFunc()
436       return getIORuntimeFunc<mkIOKey(OutputReal64)>(loc, builder);  in getOutputFunc()
443       return getIORuntimeFunc<mkIOKey(OutputComplex32)>(loc, builder);  in getOutputFunc()
445       return getIORuntimeFunc<mkIOKey(OutputComplex64)>(loc, builder);  in getOutputFunc()
448     return getIORuntimeFunc<mkIOKey(OutputLogical)>(loc, builder);  in getOutputFunc()
457       return getIORuntimeFunc<mkIOKey(OutputAscii)>(loc, builder);  in getOutputFunc()
459   return getIORuntimeFunc<mkIOKey(OutputDescriptor)>(loc, builder);  in getOutputFunc()
527     return getIORuntimeFunc<mkIOKey(InputDescriptor)>(loc, builder);  in getInputFunc()
530                ? getIORuntimeFunc<mkIOKey(InputLogical)>(loc, builder)  in getInputFunc()
531                : getIORuntimeFunc<mkIOKey(InputInteger)>(loc, builder);  in getInputFunc()
534       return getIORuntimeFunc<mkIOKey(InputReal32)>(loc, builder);  in getInputFunc()
536       return getIORuntimeFunc<mkIOKey(InputReal64)>(loc, builder);  in getInputFunc()
542       return getIORuntimeFunc<mkIOKey(InputComplex32)>(loc, builder);  in getInputFunc()
544       return getIORuntimeFunc<mkIOKey(InputComplex64)>(loc, builder);  in getInputFunc()
547     return getIORuntimeFunc<mkIOKey(InputLogical)>(loc, builder);  in getInputFunc()
552       return getIORuntimeFunc<mkIOKey(InputAscii)>(loc, builder);  in getInputFunc()
554   return getIORuntimeFunc<mkIOKey(InputDescriptor)>(loc, builder);  in getInputFunc()
929   mlir::func::FuncOp ioFunc = getIORuntimeFunc<mkIOKey(SetFile)>(loc, builder);  in genIOOption()
947     ioFunc = getIORuntimeFunc<mkIOKey(SetAccess)>(loc, builder);  in genIOOption()
950     ioFunc = getIORuntimeFunc<mkIOKey(SetAction)>(loc, builder);  in genIOOption()
953     ioFunc = getIORuntimeFunc<mkIOKey(SetAsynchronous)>(loc, builder);  in genIOOption()
956     ioFunc = getIORuntimeFunc<mkIOKey(SetBlank)>(loc, builder);  in genIOOption()
959     ioFunc = getIORuntimeFunc<mkIOKey(SetDecimal)>(loc, builder);  in genIOOption()
962     ioFunc = getIORuntimeFunc<mkIOKey(SetDelim)>(loc, builder);  in genIOOption()
965     ioFunc = getIORuntimeFunc<mkIOKey(SetEncoding)>(loc, builder);  in genIOOption()
968     ioFunc = getIORuntimeFunc<mkIOKey(SetForm)>(loc, builder);  in genIOOption()
971     ioFunc = getIORuntimeFunc<mkIOKey(SetPad)>(loc, builder);  in genIOOption()
974     ioFunc = getIORuntimeFunc<mkIOKey(SetPosition)>(loc, builder);  in genIOOption()
977     ioFunc = getIORuntimeFunc<mkIOKey(SetRound)>(loc, builder);  in genIOOption()
980     ioFunc = getIORuntimeFunc<mkIOKey(SetSign)>(loc, builder);  in genIOOption()
983     ioFunc = getIORuntimeFunc<mkIOKey(SetCarriagecontrol)>(loc, builder);  in genIOOption()
1005   return genIntIOOption<mkIOKey(SetRecl)>(converter, loc, cookie, spec);  in genIOOption()
1012   return genCharIOOption<mkIOKey(SetStatus)>(converter, loc, cookie, spec.v);  in genIOOption()
1023     ioFunc = getIORuntimeFunc<mkIOKey(SetAdvance)>(loc, builder);  in genIOOption()
1026     ioFunc = getIORuntimeFunc<mkIOKey(SetBlank)>(loc, builder);  in genIOOption()
1029     ioFunc = getIORuntimeFunc<mkIOKey(SetDecimal)>(loc, builder);  in genIOOption()
1032     ioFunc = getIORuntimeFunc<mkIOKey(SetDelim)>(loc, builder);  in genIOOption()
1035     ioFunc = getIORuntimeFunc<mkIOKey(SetPad)>(loc, builder);  in genIOOption()
1038     ioFunc = getIORuntimeFunc<mkIOKey(SetRound)>(loc, builder);  in genIOOption()
1041     ioFunc = getIORuntimeFunc<mkIOKey(SetSign)>(loc, builder);  in genIOOption()
1060   return genCharIOOption<mkIOKey(SetAsynchronous)>(converter, loc, cookie,  in genIOOption()
1075   return genIntIOOption<mkIOKey(SetPos)>(converter, loc, cookie, spec);  in genIOOption()
1082   return genIntIOOption<mkIOKey(SetRec)>(converter, loc, cookie, spec);  in genIOOption()
1101           getIORuntimeFunc<mkIOKey(GetSize)>(loc, builder);  in genIOReadSize()
1227       getIORuntimeFunc<mkIOKey(EnableHandlers)>(loc, builder);  in genConditionHandlerCall()
1560             ? getIORuntimeFunc<mkIOKey(CheckUnitNumberInRange64)>(loc, builder)  in genIOUnitNumber()
1561             : getIORuntimeFunc<mkIOKey(CheckUnitNumberInRange128)>(loc,  in genIOUnitNumber()
1657   return genBasicIOStmt<mkIOKey(BeginBackspace)>(converter, stmt);  in genBackspaceStatement()
1663   return genBasicIOStmt<mkIOKey(BeginEndfile)>(converter, stmt);  in genEndfileStatement()
1669   return genBasicIOStmt<mkIOKey(BeginFlush)>(converter, stmt);  in genFlushStatement()
1675   return genBasicIOStmt<mkIOKey(BeginRewind)>(converter, stmt);  in genRewindStatement()
1688           getIORuntimeFunc<mkIOKey(GetNewUnit)>(loc, builder);  in genNewunitSpec()
1713     beginFunc = getIORuntimeFunc<mkIOKey(BeginOpenUnit)>(loc, builder);  in genOpenStatement()
1724     beginFunc = getIORuntimeFunc<mkIOKey(BeginOpenNewUnit)>(loc, builder);  in genOpenStatement()
1744   return genBasicIOStmt<mkIOKey(BeginClose)>(converter, stmt);  in genCloseStatement()
1756       hasId ? getIORuntimeFunc<mkIOKey(BeginWait)>(loc, builder)  in genWaitStatement()
1757             : getIORuntimeFunc<mkIOKey(BeginWaitAll)>(loc, builder);  in genWaitStatement()
1802             return getIORuntimeFunc<mkIOKey(BeginInternalArrayListInput)>(  in getBeginDataTransferFunc()
1804           return getIORuntimeFunc<mkIOKey(BeginInternalArrayFormattedInput)>(  in getBeginDataTransferFunc()
1808           return getIORuntimeFunc<mkIOKey(BeginInternalListInput)>(loc,  in getBeginDataTransferFunc()
1810         return getIORuntimeFunc<mkIOKey(BeginInternalFormattedInput)>(loc,  in getBeginDataTransferFunc()
1814         return getIORuntimeFunc<mkIOKey(BeginExternalListInput)>(loc, builder);  in getBeginDataTransferFunc()
1815       return getIORuntimeFunc<mkIOKey(BeginExternalFormattedInput)>(loc,  in getBeginDataTransferFunc()
1818     return getIORuntimeFunc<mkIOKey(BeginUnformattedInput)>(loc, builder);  in getBeginDataTransferFunc()
1824             return getIORuntimeFunc<mkIOKey(BeginInternalArrayListOutput)>(  in getBeginDataTransferFunc()
1826           return getIORuntimeFunc<mkIOKey(BeginInternalArrayFormattedOutput)>(  in getBeginDataTransferFunc()
1830           return getIORuntimeFunc<mkIOKey(BeginInternalListOutput)>(loc,  in getBeginDataTransferFunc()
1832         return getIORuntimeFunc<mkIOKey(BeginInternalFormattedOutput)>(loc,  in getBeginDataTransferFunc()
1836         return getIORuntimeFunc<mkIOKey(BeginExternalListOutput)>(loc, builder);  in getBeginDataTransferFunc()
1837       return getIORuntimeFunc<mkIOKey(BeginExternalFormattedOutput)>(loc,  in getBeginDataTransferFunc()
1840     return getIORuntimeFunc<mkIOKey(BeginUnformattedOutput)>(loc, builder);  in getBeginDataTransferFunc()
1950                     getIORuntimeFunc<mkIOKey(InputNamelist)>(loc, builder),  in genDataTransferStmt()
1959                     getIORuntimeFunc<mkIOKey(OutputNamelist)>(loc, builder),  in genDataTransferStmt()
2042       getIORuntimeFunc<mkIOKey(InquireCharacter)>(loc, builder);  in genInquireSpec()
2072       getIORuntimeFunc<mkIOKey(InquireInteger64)>(loc, builder);  in genInquireSpec()
2109       pendId ? getIORuntimeFunc<mkIOKey(InquirePendingId)>(loc, builder)  in genInquireSpec()
2110              : getIORuntimeFunc<mkIOKey(InquireLogical)>(loc, builder);  in genInquireSpec()
2195     beginFunc = getIORuntimeFunc<mkIOKey(BeginInquireUnit)>(loc, builder);  in genInquireStatement()
2203     beginFunc = getIORuntimeFunc<mkIOKey(BeginInquireFile)>(loc, builder);  in genInquireStatement()
2217     beginFunc = getIORuntimeFunc<mkIOKey(BeginInquireIoLength)>(loc, builder);  in genInquireStatement()
2236                 loc, getIORuntimeFunc<mkIOKey(GetIoLength)>(loc, builder), args)  in genInquireStatement()