anchor.diff:  
   compile_test() ->
       ?assertMatch({ok, _}, re2:compile(".*")),
  -    ?assertMatch({error, _}, re2:compile(".*", [{max_mem, 4}])).
  +    ?assertMatch({error, _}, re2:compile("(a")),
  +    ?assertMatch({error, _}, re2:compile(".*", [{max_mem, 4}])),
  +    ?assertMatch({'EXIT',{badarg,_}},
  +                 (catch re2:compile("test(?<name", [unknown]))),
  +    ?assertMatch({error,{bad_perl_op,_,_}}, re2:compile("test(?<name")).
   
   replace_test() ->
       ?assertEqual(<<"heLo worLd">>,
  
positive.code:     {ok, RegExA} = re2:compile(<<"h.*o">>),
  
      ?assertMatch({'EXIT',{badarg,_}},
                   (catch re2:compile("test(?<name", [unknown]))),
      ?assertMatch({error,{bad_perl_op,_,_}}, re2:compile("test(?<name")),
      ?assertMatch({'EXIT',{badarg,_}},
                   (catch re2:match("hello", RegExA, [ok]))),
      ?assertMatch({'EXIT',{badarg,_}},
                   (catch re2:match("hello", "h.*o", [ok]))),
  
negative.code:                  re2:match(<<"hello">>, RegExA,
                             [{capture,['A',2,"B"],binary}])),
  
      ?assertEqual({match,[{-1,0},{-1,0},{-1,0}]},
                   re2:match(<<"hello">>, <<"h.*o">>,
                             [{capture,['A',2,"B"],index}])),
  