1. 導入
メインフレームでの開発において、メモリの直接操作はパフォーマンスの要ですが、PL/Iでビット文字列（BIT型）を扱う際には注意が必要です。特に「ビット単位でのアドレス取得」を期待してADDR関数を使用すると、思わぬコンパイルエラーや意図しない挙動に直面します。本稿では、ビット操作時の物理的制約を理解し、安全にデータへアクセスするための考え方を解説します。
2. 基礎知識
メインフレームのアーキテクチャでは、メモリ管理の最小単位は「バイト（8ビット）」です。そのため、1バイトの境界を跨がないビット列であっても、CPUやメモリコントローラから見れば「バイトの一部」としてしか認識されません。
PL/IのADDR関数は、指定された変数の「バイト単位の先頭アドレス」を返します。しかし、BIT(n)型で定義された変数の特定部分（SUBSTRなど）をADDRの引数に渡そうとすると、言語仕様上「アドレスが存在しない（バイト境界に配置されていない）」と判定され、参照が許可されないケースがほとんどです。
3. 実装/解決策
ビット操作を効率的に行うためには、ビット単位のアドレス取得を諦め、「バイト単位のアドレス」を取得した上で、「ビットオフセット」を別途管理する設計が鉄則です。
特定のビット列を操作したい場合は、基点となる領域のアドレスをADDRで取得し、そこからのオフセットを計算して、言語のビット操作機能（SUBSTRや論理演算）を組み合わせるのが最も安全で、かつ保守性の高い手法です。
4. サンプルプログラム
以下は、ビット列のアドレスを取得しようとして失敗する例と、正しい設計方針に基づく実装例です。
/ — サンプルコード: ビット操作の正しいアプローチ — /
DCL B_AREA BIT(16) INIT(‘1010101011110000’B);
DCL P_BASE POINTER;
DCL OFFSET FIXED BIN(15);
/ 誤った実装: SUBSTRで切り出したビット列のアドレスは取得できない /
/ P_BASE = ADDR(SUBSTR(B_AREA, 3, 4)); <-- コンパイルエラーまたは警告発生 /
/ 正しい実装: 基点アドレスとオフセットで管理する /
P_BASE = ADDR(B_AREA); / B_AREA全体のバイト先頭アドレスを取得 /
OFFSET = 2; / 3ビット目から開始したい場合はオフセット2を指定 /
/ 処理: ビット演算やSUBSTRで直接操作する /
/ ADDRを介さず、論理的な位置関係でビットを抽出する /
IF SUBSTR(B_AREA, OFFSET + 1, 4) = '1010'B THEN
DO;
/ ここに処理を記述 /
END;
5. 応用・注意点
現場で最も多いトラブルは、C言語などのポインタ操作に慣れたエンジニアが「ビット単位のポインタ」を独自に計算しようとして、アドレス境界違反を起こすケースです。
特に、ビット文字列を構造体（STRUCTURE）のメンバとして定義し、そのメンバのアドレスを取得しようとすると、コンパイラはアライメント（配置）の整合性を優先するため、予期せぬパディング（空白領域）が挿入されることがあります。
ビット操作が頻発するデータ構造を設計する場合は、ビット単位のオフセットを管理するハンドルクラス的なロジックを共通関数化し、個別のプログラムで直接メモリを操作しないようラップすることをお勧めします。これにより、将来的なデータ構造の変更にも強い、堅牢なプログラムが維持できます。
コメント