GET_COMMAND (COMMAND ， LENGTH ， STATUS) (Fortran 2003)

線上編輯

用途

傳回呼叫程式的指令。

類別

次常式

引數類型和屬性

COMMAND (optional)
INTENT(OUT) CHARACTER 純量。 它是呼叫程式的指令，如果指令不明，則為空白字串。
LENGTH (optional)
INTENT(OUT) INTEGER 純量。 它是呼叫程式之指令的有效長度，如果指令的長度不明，則為 0。 此長度包括每一個引數的有效尾端空白。 它不包括將指令指派給 COMMAND 引數時所發生的任何截斷或填補。
STATUS (optional)
INTENT(OUT) INTEGER 純量。 它是狀態值。
STATUS 具有下列其中一個值:
  • 1 表示指令擷取失敗
  • -1 表示 COMMAND 引數存在且其長度小於指令的有效長度
  • 0 否則

範例

integer len, status
character(7) :: cmd
call    GET_COMMAND(cmd, len, status)
print*, cmd
print*, len
print*, status
end
下列 程式碼 是上述程式所產生的範例輸出:
$ a.out
a.out       (followed by two spaces)
5
0
$ a.out aa
a.out a
8
-1