Contents

(*
  camlexer - Lexical Analyzer for Gonzui ocamlsupport

  Copyright (C) 2005 Soutaro Matsumoto <[e-mail]>
      All rights reserved.
      This is free software with ABSOLUTELY NO WARRANTY.

  You can redistribute it and/or modify it under the terms of
  the GNU General Public License version 2.
*)

(* $Id: camlexer.ml,v 1.1.1.1 2005/09/15 19:38:39 bashi Exp $ *)

let main () = 
  try
    let lexbuf = Lexing.from_channel stdin in
      while true do
	let ((lnum,bnum),tname,lexed_str) = (Lexer.token lexbuf) in
	  begin
	    Printf.printf "%d:%d:%s:%s\n" lnum bnum (Types.to_string tname) lexed_str;
	    flush stdout;
	  end
      done
  with
      Lexer.EOF -> exit 0

let _ = main ()

Version data entries

2 entries across 2 versions & 1 rubygems

Version	Path
langscan-1.2-x86-mswin32-60	lib/langscan/ocaml/camlexer.ml
langscan-1.2	lib/langscan/ocaml/camlexer.ml