Initial revision

[helm.git] / helm / DEVEL / pxp / pxp / rtests / reader / minilex.mll

diff --git a/helm/DEVEL/pxp/pxp/rtests/reader/minilex.mll b/helm/DEVEL/pxp/pxp/rtests/reader/minilex.mll
new file mode 100644 (file)
index 0000000..1c9fbec
--- /dev/null
+++ b/helm/DEVEL/pxp/pxp/rtests/reader/minilex.mll
@@ -0,0 +1,7 @@
+{ }
+rule nextchar = parse 
+    _ 
+      { Some (Lexing.lexeme lexbuf).[0] }
+  | eof
+      { None }
+{ }