+----------------------------------IBM 拡張----------------------------------+

SIGNAL(I, PROC)

目的

SIGNAL プロシージャーを使用すると、プログラムは特定の オペレーティング・システム・シグナルの受信時に 呼び出されるプロシージャーを指定することができます。

クラス

サブルーチン

引き数の型と属性

I
機能するシグナルの値を指定する整数です。 これは、INTENT(IN) 引き数です。使用可能なシグナルの値は、C インクルード・ファイル signal.h に定義されます。 シグナルの値のサブセットは、 Fortran インクルード・ファイル fexcp.h に定義されます。

PROC
引き数 I で指定されたシグナルを受信すると呼び出されるユーザー定義のプロシージャーを指定します。これは、INTENT(IN) 引き数です。

      INCLUDE 'fexcp.h'
      INTEGER   SIGUSR1
      EXTERNAL  USRINT
! Set exception handler to produce the traceback code.
! The SIGTRAP is defined in the include file fexcp.h.
! xl__trce is a procedure in the XL Fortran
! run-time library.  It generates the traceback code.
      CALL SIGNAL(SIGTRAP, XL__TRCE)
      ...
! Use user-defined procedure USRINT to handle the signal
! SIGUSR1.
      CALL SIGNAL(SIGUSR1, USRINT)
      ...

関連情報

XL Fortran ユーザーズ・ガイド」の『-qsigtrap オプション』には、 コンパイラー・オプションを使用して SIGTRAP シグナル用にハンドラーを設定する方法が 記載されています。

+------------------------------End of IBM 拡張-------------------------------+

IBM Copyright 2003