[nem-pl] Marko regexp

[Kamil Skalski]

Dodałem ostatnio takie makro do matchowania po wyrażeniach regularnych. Działa 
już np. taki match:

 regexp (match (s) {
            | "a*" => printf ("1\n");
            | "c|d"
            | "b+.*" => printf ("2\n");
            | @"(?<first>\d+)-\d*" => printf ("%s 3\n", first);
            | _ => printf ("default\n");
          });

Prawie działa
           | @"(?<first : int>\d+)" => printf ("%d\n", first)

Działać też będzie
          | @"(?<x>baba)?dziad" => 
               match (x) { None => sam chłop | Some => z babą }

pomysł jest zaczerpnięty z:
http://www.yl.is.s.u-tokyo.ac.jp/~oiwa/pub/caml/regexp-pp-0.9.3/