caml2html_test.mli
1: type 'a weird = E10 2: module Zéro'04 : 3: sig val characters : char list val n : int val the_Truth : bool end 4: val hel'Lo : string 5: val ( |* ) : int -> int -> int
caml2html_test.ml
1: 2: (* Test file for caml2html (the first line is empty) *) 3: 4: (* -hc option: link to caml2html_test.mli (same page, colorized) 5: * link to caml2html_test.ml (source) *) 6: 7: # 123 (* line directives are not parsed, sorry... *) 8: 9: (* This is a multi-line "*)" 10: comment *) 11: 12: open Printf 13: 14: type 'aa' weird = E10 15: 16: (* nested (* comments *) *) 17: 18: module Zéro'04 = 19: struct 20: let characters = [ 'a'; '\000'; '\x12'; ' 21: '; '\t'; 'z' ] 22: let n = 0X12 + truncate 1.2E-1_2 23: let the_Truth = 24: let ignore4 a b c d = false in 25: not (ignore4 1._0_None 1.0E10E10) 26: end 27: 28: let hel'Lo = "\"Hello \ 29: World!\"" 30: 31: let ( |* ) a b = 32: match a, b with 33: 1, 0 | 0, 1 -> 1 34: | _ -> 0 35: 36: let _ = 37: assert true; 38: if 0 mod 1 < 1 && `Abc <> `def then 39: print_endline hel'Lo
This document was generated using caml2html