日本語プログラミング言語Mindの小技 「子プロセス終了？」～非同期実行と終了検知２～

はじめに

日本語プログラミング言語Mindの小技「子プロセス終了？」について説明したいと思います。

対象読者

日本語プログラミング言語Mindのユーザー、または日本語プログラミング言語に興味のある方

この小技に関連するMind言語マニュアル

この小技に関連するMind言語仕様の記述はMind8プログラミングマニュアルに記載がありません。（今後できるようです。）

Mind7の付属の上級者向けドキュメントmind7\doc\guiprog.docmに記載があります。

Ｇ２．　Tcl/TkとMind
￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣

■自動的に「一つのイベントを処理」が行われるもの
　以下のMind単語を使うと、その内部で「一つのイベントを処理」が呼ばれ、
Tcl/Tkに制御が渡るため、利用者の側でそれを行なう必要はありません。
～略～
　　・「子プロセス終了？」
～略～

本機能（本記事）は、下記のバージョンに対応しています。Mind８のLinux版も対応していると思いますが、本記事では特に検証を行っておりません。

対応バージョン

■Mind７　■Mind８　■Mind９
■Windows版　□Linux版

小技の解説

Mindの小技「子プロセス終了？」はMindいくつかある外部プログラムの起動処理の一つである「子プロセス起動」に関連した機能です。「子プロセス起動」に関連する詳細は、下記の記事に記載されています。

以下は上記の記事と説明内容が重複しますが、本記事だけでも概要ご理解いただけるよう再掲しました。

「子プロセス起動」では、起動した外部プログラムが終了するのを待たず、起動したMind側のプログラムコードは処理を続行します。いわゆる非同期的に実行するの類となります。同期的に外部プログラムを実行する処理単語もありますが、本記事対象外です。

「子プロセス起動」では、起動した外部プログラムの「プロセスID」がスタックに積まれますので、それを拾っておいて（変数に格納しておいて）、「子プロセス終了を待つ」または「子プロセス終了？」の処理単語で終了を検知することができます。

「子プロセス終了を待つ」　対象「プロセスID」の外部プロセスが終了するまで待機します。
「子プロセス終了？」　　　対象「プロセスID」の外部プロセスが終了しているかをチェックします。

前者は起動した外部プログラムが終了するのを待ちます。チェックしたMind側のプログラムコードは処理を待機します。いわゆる同期的に実行するの類となります。
後者は起動した外部プログラムが終了するのを待たず、チェックしたMind側のプログラムコードは処理を続行します。いわゆる非同期的に実行するの類となります。

本記事は非同期に起動した外部プログラムの終了を検知する上記２つの方法のうち、非同期に検知する方法について解説します。同期的な検知は前記参考記事を参照してください。

以下のサンプルプログラムでは、親側プログラム、子側プログラムの双方をMindで記述して説明します。

Mindプログラムソース

親側

asynChildprocessP3.src

メインとは　　（・　→　・）
        プロセスＩＤ０は　変数
        プロセスＩＤ１は　変数
        プロセスＩＤ２は　変数
        プロセスＩＤ３は　変数
        終了フラグ０は　変数
        終了フラグ１は　変数
        終了フラグ２は　変数
        終了フラグ３は　変数

※ローカル処理単語定義　ここから

 全ての子プロセスを起動するとは　（・　→　・）   
 
    "asyncChildprocessD"を　子プロセス起動し　プロセスＩＤ０に　入れ
    エラー？
　　ならば　
        「子プロセス起動エラー０：」を　表示し　エラー表示し
    さもなければ　
        「プロセスＩＤ０：」を　表示し プロセスＩＤ０を　数値表示し　改行し 
　　つぎに
    "asyncChildprocessC1"を　子プロセス起動し　プロセスＩＤ１に　入れ
    エラー？
　　ならば　
    「子プロセス起動エラー１：」を　表示し　エラー表示し　改行し
    さもなければ
    「プロセスＩＤ１：」を　表示し プロセスＩＤ１を　数値表示し　改行し
　　つぎに
    "asyncChildprocessC2"を　子プロセス起動し　プロセスＩＤ２に　入れ　
    エラー？
　　ならば　
    「子プロセス起動エラー２：」を　表示し　エラー表示し　改行し
    さもなければ
    「プロセスＩＤ２：」を　表示し プロセスＩＤ２を　数値表示し　改行し
　　つぎに
    "asyncChildprocessC3"を　子プロセス起動し　プロセスＩＤ３に　入れ
    エラー？
　　ならば　
    「子プロセス起動エラー３：」を　表示し　エラー表示し　改行し
    さもなければ
    「プロセスＩＤ３：」を　表示し プロセスＩＤ３を　数値表示し　改行し
　　つぎに

　全ての子プロセスの終了を都度検知するとは　（・　→　・）
    終了フラグ０を　クリアし
    終了フラグ１を　クリアし
    終了フラグ２を　クリアし
    終了フラグ３を　クリアし
    ここから
    「親プロセス実行中です。」を　一行表示し
    
    終了フラグ０が　偽？
    ならば
        プロセスＩＤ０で　子プロセス終了？
		ならば　終了フラグ０を　セットし
     	    「プロセスＩＤ０の子プロセスの終了パラメータ：」を　表示し　改行し 
            子プロセスの終了パラメータを　数値表示し　改行し    
		つぎに
    つぎに
    終了フラグ１が　偽？
    ならば    
	プロセスＩＤ１で　子プロセス終了？
		ならば　　終了フラグ１を　セットし
    	    「プロセスＩＤ１の子プロセスの終了パラメータ：」を　表示し　改行し 
            子プロセスの終了パラメータを　数値表示し　改行し    
		つぎに
    つぎに
    
    終了フラグ２が　偽？
    ならば
        プロセスＩＤ２で　子プロセス終了？
		ならば　　　終了フラグ２を　セットし
            「プロセスＩＤ２の子プロセスの終了パラメータ：」を　表示し　改行し    
            子プロセスの終了パラメータを　数値表示し　改行し
        つぎに
	つぎに

    終了フラグ３が　偽？
    ならば
        プロセスＩＤ３で　子プロセス終了？
		ならば　　　終了フラグ３を　セットし
            「プロセスＩＤ３の子プロセスの終了パラメータ：」を　表示し　改行し    
            子プロセスの終了パラメータを　数値表示し　改行し
        つぎに    
    つぎに
        
    終了フラグ０が　真？　かつ
    終了フラグ１が　真？　かつ
    終了フラグ２が　真？　かつ
    終了フラグ３が　真？
    ならば　打ち切り
    つぎへ
    　
    １０で　十ミリ秒単位待ち
    
    繰り返すこと

※ローカル処理単語定義　ここまで

　本体とは　（・　→　・）
   「親プロセス実行開始しました。」を　一行表示し

　　全ての子プロセスを起動し
　　全ての子プロセスの終了を都度検知し

    「親プロセス実行終了しました。」を　一行表示すること。

"asyncChildprocessD"というプログラムは存在しませんので、意図的に起動エラーが起きることを想定しています。

一度終了が確認された後は、チェックの重複を避けるため終了判定の前に終了フラグの判定を入れています。

asynChildprocessP3.src

    終了フラグｎが　偽？
    ならば
        ～終了判定～
    つぎに

記述量が長くなったため、プロセスＩＤと終了フラグを共有する局所処理単語で記述しています。局所処理単語につきましては下記の記事に解説が詳しくあります。

子側

asynChildprocessC1.src

メインとは　　（・　→　・）
    「子プロセス１実行開始しました。」を　一行表示し
   １０で　回数指定し
        「子プロセス１実行中です。」を　一行表示し
        １０で　十ミリ秒単位待ち
    繰り返す
    「子プロセス１実行終了しました。」を　一行表示し
    終了パラメータに　－１を　入れること。 

asynChildprocessC2.src

メインとは　　（・　→　・）
    「子プロセス２実行開始しました。」を　一行表示し
    ４で　回数指定し
        「子プロセス２実行中です。」を　一行表示し
        １０で　十ミリ秒単位待ち
    繰り返す
    「子プロセス２実行終了しました。」を　一行表示し
    終了パラメータに　－２を　入れること。    

asynChildprocessC3.src

メインとは　　（・　→　・）
    「子プロセス３実行開始しました。」を　一行表示し
    ２で　回数指定し
        「子プロセス３実行中です。」を　一行表示し
        １０で　十ミリ秒単位待ち
    繰り返す
    「子プロセス３実行終了しました。」を　一行表示し
    終了パラメータに　－３を　入れること。    

それぞれ反復回数と終了パラメータは異なる値としています。
それぞれ早く終わりすぎないよう０．１秒のディレイをループに挿入しています。

コンパイル結果

ではコンパイルしてみます。下位ライブラリはfileを指定します。
asyncChildprocessC1,2,3の結果は割愛しています。

Mind９

下図はMind９βです。

C:\developments\vscode\mind9>mind asyncChildprocessP3 file   

日本語プログラミング言語 Ｍｉｎｄ Version 8.11 for Windows
          Copyright(C) 1985 Scripts Lab. Inc.
コンパイル中 .. 終了
Coping.. C:\mind9-beta\mind9-beta\bin\mindex.exe --> asyncChildprocessP3.exe

Mind8

C:\developments\vscode\mind9>mind asyncChildprocessP3 file

日本語プログラミング言語 Ｍｉｎｄ Version 8.07 for Windows
          Copyright(C) 1985 Scripts Lab. Inc.
コンパイル中 .. 終了
Coping.. c:\pmind\bin\mindex.exe --> asyncChildprocessP3.exe

Mind7

C:\developments\vscode\mind9>mind asyncChildprocessP3 file
日本語プログラミング言語 Ｍｉｎｄ Version 7.5 for Windows
          Copyright(C) 1985-2004 Scripts Lab. Inc.
          Single user license.  Serial No:********
コンパイル中 - 終了
Coping.. C:\mind7\bin\mindexec.exe -> asyncChildprocessP3.exe

実行結果

つづいて実行してみます。
下記のような実行プログラムが生成されています。コンパイル結果はMind7です。

C:\developments\vscode\mind9>dir asyncChildprocess*.exe

 C:\developments\vscode\mind9 のディレクトリ
2025/08/16  07:43            57,344 asyncChildprocessC1.exe
2025/08/16  07:42            57,344 asyncChildprocessC2.exe
2025/08/16  07:42            57,344 asyncChildprocessC3.exe
2025/08/16  07:37            57,344 asyncChildprocessP3.exe
               4 個のファイル             229,376 バイト

Mind8の結果です。記述は割愛していますがMind7/9βも同じです。ただし、同じバージョンでも実行した結果はメッセージ出力の前後関係が若干変わる場合がありますので、異なるバージョンで実行した場合も同様です。

最初にchildprocessC1,2,3を単独起動し、続いてchildprocessP3を起動します。（childprocessP3によってchildprocessC1,2,3も起動されます。）

C:\developments\vscode\mind9>asyncChildprocessC1 
子プロセス１実行開始しました。
子プロセス１実行中です。
子プロセス１実行中です。
子プロセス１実行中です。
子プロセス１実行中です。
子プロセス１実行中です。
子プロセス１実行中です。
子プロセス１実行中です。
子プロセス１実行中です。
子プロセス１実行中です。
子プロセス１実行中です。
子プロセス１実行終了しました。

C:\developments\vscode\mind9>asyncChildprocessC2 
子プロセス２実行開始しました。
子プロセス２実行中です。
子プロセス２実行中です。
子プロセス２実行中です。
子プロセス２実行中です。
子プロセス２実行終了しました。

C:\developments\vscode\mind9>asyncChildprocessC3 
子プロセス３実行開始しました。
子プロセス３実行中です。
子プロセス３実行中です。
子プロセス３実行終了しました。

C:\developments\vscode\mind9>

C1は１０回、C2が４回、C3が２回それぞれメッセージ出力を繰り返します。

C:\developments\vscode\mind9>asyncChildprocessP3
親プロセス実行開始しました。
子プロセス起動エラー０：No such file or directory
プロセスＩＤ１：348
プロセスＩＤ２：356
プロセスＩＤ３：368
親プロセス実行中です。
プロセスＩＤ０の子プロセスの終了パラメータ：
0
子プロセス１実行開始しました。
子プロセス２実行開始しました。
子プロセス２実行中です。
子プロセス１実行中です。
子プロセス３実行開始しました。
子プロセス３実行中です。
親プロセス実行中です。
子プロセス３実行中です。
子プロセス２実行中です。
子プロセス１実行中です。
親プロセス実行中です。
子プロセス１実行中です。
子プロセス３実行終了しました。
子プロセス２実行中です。
親プロセス実行中です。
プロセスＩＤ３の子プロセスの終了パラメータ：
65533
子プロセス２実行中です。
子プロセス１実行中です。
親プロセス実行中です。
子プロセス２実行終了しました。
子プロセス１実行中です。
親プロセス実行中です。
プロセスＩＤ２の子プロセスの終了パラメータ：
65534
子プロセス１実行中です。
親プロセス実行中です。
子プロセス１実行中です。
親プロセス実行中です。
子プロセス１実行中です。
親プロセス実行中です。
子プロセス１実行中です。
親プロセス実行中です。
子プロセス１実行中です。
親プロセス実行中です。
子プロセス１実行終了しました。
親プロセス実行中です。
プロセスＩＤ１の子プロセスの終了パラメータ：
65535
親プロセス実行終了しました。

C:\developments\vscode\mind9>

childprocessDを起動した箇所ではエラーが返ってきていることがわかります。
またDの終了検知は、終了で正常判定されています。
起動順はC1，C2，C3ですが、終了の検知順はC3，C2，C1となっていることがわかります。

参考情報

この小技「子プロセス終了？」を使った記述例の記事は未発見です。

おわりに

いかがでしたでしょうか？なにかの参考になれば幸いです。2025年は日本語プログラミング言語Mind生誕４０周年です。

本記事シリーズのご紹介

本記事シリーズ「日本語プログラミング言語Mindの小技」は「日本語プログラミング言語Mind生誕４０周年プロジェクト」の一環です。

興味を持たれた方は日本語プログラミング言語Mind公式サイトにアクセスすると、Mindコンパイラをダウンロードできます。

面白い！、楽しい、カンタン、難しいのも書ける！みんなでやってみよう