演算子

コンテキスト：

クラス ValueType インターフェイス 型メンバー

operator-specification

operator-header

operator-name

binary-operator

comparison-operator	arithmetic-operator	bitwise-operator
= <> <= < >= >	+ - * / **	B-AND B-OR B-XOR B-LEFT B-RIGHT

unary-operator

+
-
B-NOT
EXPLICIT
IMPLICIT

例

class-id MyType.
operator-id + 
procedure division using by value o as type MyType, I as binary-long
                           returning ret as type MyType.  
  ...
end operator.
end class.

演算子のオーバーロードのサンプルも参照してください。このサンプルは、Start > All Programs > Micro Focus Enterprise Developer > Samples > Visual COBOL Samples、の場合JVM COBOL 言語リファレンスの場合。に用意されています。

変換演算子、IMPLICIT および EXPLICIT

変換演算子はオーバーロードできるため、適切な変換演算子が呼び出し元コードのパラメータータイプに従って使用されます。シグネチャ (手続き部の USING 句) が一致する演算子が実行されます。たとえば、タイプ Timer のデータ項目を binary-long に変換する必要がある場合、使用される演算子は、入力パラメーターのタイプが Timer で出力パラメーターのタイプが binary-long の演算子になります。

変換演算子を定義して使用するには、次のようにします。

operator-id ヘッダーでキーワード IMPLICIT または EXPLICIT を使用します。
演算子は、演算子のシグネチャ (手続き部の USING 句) で指定されるタイプを変換します。
変換されるタイプは、クラスまたは値タイプになり、インターフェイスにはなりません。
相互に継承するタイプは、変換演算子を使用して変換できません。
同じ変換は 2 回 (1 回は黙示的、もう 1 回は明示的) 定義することはできません。

演算子のオーバーロード

演算子をオーバーロードして、代替動作やさまざまな作用対象タイプに対する動作を提供できます。たとえば、Timer タイプを時間と分で表現する場合、2 つの Timer を追加する 1 つの + (プラス) 演算子、および分数を Timer タイプに追加するもう 1 つの + (プラス) 演算子を定義できます。

オーバーロードする演算子を宣言するには、次のようにします。

オーバーロードされた演算子は public および static になります。
演算子のシグネチャのパラメーターは、value で宣言する必要があります。これには returning 項目が必要です。
次の演算子をオーバーロードでき、次の operator-id シグネチャが必要です。

オーバーロードできる演算子	operator-id シグネチャのオーバーロード	注
次のような比較演算子： t1 = t2, t1 equals t2	value t1 t2 returning condition-value	比較演算子はペアで指定する必要があります。ペアは、等号演算子 (=) と不等号演算子 (<>)、大なり演算子 (>) と小なり演算子 (<)、および以上演算子 (>=) と以下演算子 (<=) です。 returning 項目は condition-value タイプにする必要があります。
次のようなその他の 2 項演算子： t1 + t2	value t1 t2 returning t3	2 項演算子では 2 つの引数が使用されます。2 つの引数のタイプが異なる場合、演算子のペアを指定して、2 つの作用対象がいずれかの順序で渡されるようにする必要があります。
次のような単項演算子： -t1	value t1 returning t3	単項演算子で使用される引数は 1 つのみです。

加減乗除の算術演算子はすべてオーバーロードできますが、それらに相当する動詞はオーバーロードできません。たとえば、次の文の ADD はオーバーロードできません。

       add a to b giving c