Programming Language ADP

instr （部分文字列の検索）

形式

　instr( $src, $findstr, $start, $pos)

引数

$src: 文字列
$findstr: 検索文字列
$start: 開始位置（バイト）（省略可）
$pos: 結果（バイト）

完了時の動作

文字列が見つかった場合：次の述語を実行に移ります。
文字列が見つからなかった場合：バックトラックします。

バックトラック時の動作

常にバックトラックします。前の述語にバックトラックします。

説明

$srcで指定された文字列から$findstrで指定された文字列を検索します。
検索は文字列の先頭から終端に向かって行われます。逆向きの検索を行う場合はinstrrevを使用します。
結果の位置は、$pos（バイト単位）に格納されます。検索開始位置を$start（バイト単位）で指定することもできます。
みつからなかったらバックトラックします。

コード例（lib/instr.p）

+t('This is a pen. I have the pen. I give you the pen.');
,t.instr('pen').prtn,next;
,prtn;
,t.instr('pen',10).prtn,next;
,prtn;
,t.instr('pen',11).prtn,next;
,prtn;

実行例

D:\sample\lib>adp instr.p
10
26
46

10
26
46

26
46