]> matita.cs.unibo.it Git - helm.git/commitdiff
Back-ported to camlp5 < 5.00.
authorClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Tue, 27 Nov 2007 16:56:54 +0000 (16:56 +0000)
committerClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Tue, 27 Nov 2007 16:56:54 +0000 (16:56 +0000)
helm/software/components/content_pres/test_lexer.ml

index 393017a443416d9086949863f068a88ef11e69a6..e76756e0f3d352c63421f8d021ddc8bdb6a14b24 100644 (file)
@@ -53,7 +53,7 @@ let _ =
     if a = "EOI" then raise Stream.Failure;
     let pos = loc_func !tok_count in
     print_endline (Printf.sprintf "%s '%s' (@ %d-%d)" a b
-      (Ploc.first_pos pos) (Ploc.last_pos pos));
+      (Stdpp.first_pos pos) (Stdpp.last_pos pos));
     incr tok_count;
     dump ()
   in