メインフレームの守護神PL/I：動的メモリ管理の「後始末」を攻略する
皆さん、こんにちは。長年メインフレームの深淵を見つめてきたアーキテクトです。
JavaやCOBOLから来た方にとって、PL/I（ピーエル・アイ）という言語は、まるで「職人気質の古参エンジニア」のように見えるかもしれません。歴史は長いし、仕様は膨大。でも安心してください。一つひとつのルールを紐解けば、これほど強力で柔軟な相棒は他にいません。
今回は、システムのリソースを食いつぶさないための重要技術、「動的メモリの解放とダングリングポインタの回避」についてお話しします。
—
1. 「動的確保」とは、アパートを借りること
まずイメージしてみましょう。プログラムが実行中に必要なデータを「動的（DYNAMIC）」に確保するというのは、「今すぐ必要な分だけ、アパートの一室を借りる」ことと同じです。
PL/Iでは `ALLOCATE` 文を使ってメモリを確保します。しかし、使い終わったらどうなるでしょう？ そう、解約手続きをしないと、家賃（メモリ領域）を延々と払い続けることになります。これが「メモリリーク」です。
1
/ 構造体のようなものを動的確保する例 /
DCL 1 MY_DATA BASED(P), / BASED属性は「ポインタで操作するよ」という宣言 /
2 ID CHAR(5),
2 VAL FIXED BIN(31);
DCL P POINTER; / ポインタ変数Pは、部屋の「住所」を覚えるメモ帳 /
ALLOCATE MY_DATA; / ここでメモリ領域を確保！(部屋を借りる) /
/ … ここでPを使ってデータ操作 … /
2. 「FREE文」という名の退去届
使い終わったメモリを返すのが `FREE` 文です。ここまでは他の言語と似ていますよね。しかし、ここからがPL/Iの真骨頂であり、最も注意が必要なポイントです。
「`FREE` をしただけでは、メモ帳（ポインタ）に書かれた住所は消えない」という事実です。
悲劇の「ダングリングポインタ」
`FREE` を実行すると、システムはその領域を「空き地」とみなします。しかし、あなたのプログラムのポインタ変数 `P` には、まだ「さっきまで借りていた部屋の住所」が残ったままです。
この残った住所を頼りに再びアクセスしようとすると……そう、「存在しない住所への不法侵入（アクセス違反）」が発生し、プログラムは無慈悲なABEND（異常終了）を迎えることになります。これが「ダングリングポインタ（宙ぶらりんポインタ）」の正体です。
3. 安全な解放手順：NULLという「消しゴム」
では、どうすればいいのか。答えはシンプルです。「退去届を出した（FREEした）ら、すぐメモ帳を白紙にする」ことです。
PL/Iには、無効な状態を示す `NULL()` という便利な定数が用意されています。これを使って、ポインタを安全な状態に戻してあげましょう。
1
/ 安全なメモリ解放の手順 /
FREE MY_DATA; / 1. 領域を解放する /
P = NULL(); / 2. ポインタにNULLを代入して、住所を消去する /
/ これで安心！もし誤ってPを使おうとしても、
NULLであればシステムが即座にエラーを検知して教えてくれる /
なぜこれが重要なのか？
メインフレームのバッチ処理では、数万、数百万件のデータをループ処理することが日常茶飯事です。もしこの「NULL代入」を忘れると、ループの回数分だけエラーの爆弾が蓄積され、ある日突然、本番環境で盛大なABENDを引き起こすことになります。
「面倒だな」と思うかもしれませんが、「FREEしたら即NULL」。このリズムを体の一部にしてしまえば、あなたはもうPL/Iのメモリ管理を完全に制御できています。
—
まとめ：恐れることはありません
PL/Iは古い言語ですが、その分「コンピュータが裏側でどう動いているか」を非常に誠実に教えてくれる言語です。
- `ALLOCATE` は部屋を借りる。
- `FREE` は退去届を出す。
- `NULL()` はメモ帳の住所を消しゴムで消す。
この3ステップさえ意識すれば、ダングリングポインタなんて怖くありません。皆さんの書くコードが、今日も明日も安定してメインフレームの上で走り続けることを応援しています。
何か不明点があれば、いつでもこの現場の窓口を叩いてくださいね。それでは、良いコーディングライフを！
