PL/Iの世界へようこそ！動的メモリの「魔法」―ALLOCATE文とヒープ管理の極意
こんにちは。メインフレームの世界へようこそ。
JavaやCOBOLでバリバリ開発をしてきた皆さんにとって、PL/Iは少し「古風で気難しい隣人」に見えるかもしれませんね。でも安心してください。PL/Iは、現代の言語が隠蔽してしまっている「メモリの呼吸」を直に感じられる、非常に誠実な言語なんです。
今日は、その中でも少しドキッとするテーマ、「動的ストレージの確保（ALLOCATE）」について紐解いていきましょう。
—
1. なぜ「動的」に確保する必要があるのか？
COBOLであれば `WORKING-STORAGE SECTION` で事前に領域を決めるのが定石ですよね。しかし、PL/Iでは「実行してみるまで、どれだけのデータが来るか分からない！」という予測不能な事態に備えるために、ヒープ領域（PL/I用語でいう `CONTROLLED` ストレージ）を巧みに操る必要があります。
イメージしてください。あなたは巨大なホテルの支配人です。
- 静的（STATIC）: 部屋は最初から決まっていて、予約がなくても空けておかなければならない。
- 動的（CONTROLLED）: お客さんが来た瞬間に部屋を作り、用事が済んだら壁ごと消し去る。
PL/Iの `ALLOCATE` は、まさにこの「必要な時に部屋を増やす」魔法の呪文なんです。
—
2. 登場人物を紹介します：STORAGEクラス
PL/Iでメモリを語るには、この「ストレージクラス」という概念が避けて通れません。
- AUTOMATIC: プロシージャに入ると作られ、終わると消える。最も標準的。
- CONTROLLED: `ALLOCATE` した時だけ生まれ、`FREE` するまで居座る。今回の主役です。
- STATIC: プログラム開始から終了まで、ずっと同じ場所に鎮座する。
`CONTROLLED` を使うには、変数の宣言時にその旨を明示する必要があります。
1
/ 変数宣言：CONTROLLED属性を付けることで、動的確保の準備が整います /
DCL MY_BUFFER CHAR(1024) CONTROLLED;
—
3. 実践：ALLOCATEとFREEの作法
では、実際にヒープ領域を確保し、使い終わったら解放するコードを見てみましょう。
1
MY_PROC: PROCEDURE OPTIONS(MAIN);
/ 1024バイトの領域をコントロール下に置く /
DCL MY_BUFFER CHAR(1024) CONTROLLED;
/ ヒープ領域からメモリを確保 /
ALLOCATE MY_BUFFER;
/ ここでMY_BUFFERにデータを読み込んだり加工したりする /
MY_BUFFER = ‘PL/Iの動的メモリ確保は怖くない！’;
/ 用が済んだら速やかに解放（メモリリーク防止！） /
FREE MY_BUFFER;
END MY_PROC;
見ての通り、非常にシンプルですよね。「確保して、使って、捨てる」。このサイクルを守れば、メモリ不足に怯える必要はありません。
—
4. もし「部屋」が足りなくなったら？（ON AREA条件）
現場で最も恐ろしいのは、メモリ確保に失敗した瞬間です。「メモリが足りません！」とプログラムが突然死（ABEND）したら目も当てられませんよね。
そんな時のために、PL/Iには「エラーが起きた時の用心棒」である `ON` 文が用意されています。
1
/ メモリ確保に失敗した時のための用心棒を立てる /
ON STORAGE
BEGIN;
PUT SKIP LIST(‘警告：ヒープ領域が枯渇しました。処理を中断します。’);
/ ここでダンプを取ったり、ログを残して安全に終了させる /
STOP;
END;
ALLOCATE MY_BUFFER;
`ON STORAGE` を記述しておけば、システムが「確保できませんでした！」と悲鳴を上げた瞬間に、私たちが用意したリカバリ処理へジャンプしてくれます。基幹システムにおいて、この「優雅なエラーハンドリング」こそが、一流のエンジニアへの第一歩です。
—
初学者の皆さんへのアドバイス
PL/Iの `ALLOCATE` は、決して「難しい」わけではなく、「メモリに対して責任を持つ」という行為そのものです。
- FREEを忘れない: 確保した分は必ず `FREE` する。これを忘れると、長時間稼働するバッチ処理でメモリが徐々に削られ、システムが悲鳴を上げます。
- ALLOCATEの連打に注意: `ALLOCATE` を連続して行うと、スタックのように積み上がります（プッシュダウン）。直近の確保分を `FREE` すれば、その一つ前の状態が復活する…という面白い挙動もPL/Iの魅力です。
最初は少し戸惑うかもしれませんが、一つずつコードを書いて動かしていけば、この言語の持つ「職人気質な頼もしさ」が分かってくるはずです。
もし現場で「変な動きをしているな？」と思ったら、それはきっとメモリ管理のどこかで、PL/Iがあなたに何かを伝えようとしているサインです。恐れずに `DISPLAY` 文で変数の状態を覗いてみてください。
それでは、メインフレームでの開発ライフを楽しんでくださいね！応援しています。
