新しいツールNew tools

• ここまでいろいろつくってきたけれど、いずれもごくわずかな基本のツールを組み合わせただけ

  We've built all this up just by gluing together a very few basic tools:

        lookfor()
        conc()
        alt()

• ツールそのものはシンプルだった

  But the tools themselves were simple

• 新しいツールが必要になったら、つくればいい

  If we needed some new tool, we could build it

• たとえば、「AがBでない場合のみAを探す」ツールならこうだ

  For example, "look for A, but only if it doesn't also look like B":

        sub this_but_not_that {
          my ($A, $B) = @_;
          my $parser = sub {    
            my $in = shift;
            my ($res, $out) = $A->($in)
                or return;
            if ($B->($in)) { return; }
            return ($res, $out);
          };
          return $parser;
        }

Next

Copyright © 2007 M. J. Dominus