Changeset 6717 for trunk/liquidsoap/src/lang/lang.ml
- Timestamp:
- 07/02/09 19:11:37 (14 months ago)
- Files:
-
- 1 modified
-
trunk/liquidsoap/src/lang/lang.ml (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/liquidsoap/src/lang/lang.ml
r6706 r6717 50 50 T.make 51 51 (T.Arrow (List.map (fun (lbl,kind,opt,_) -> (opt<>None,lbl,kind)) p, t)) 52 52 53 53 let to_doc category flags main_doc proto return_t = 54 54 let item = new Doc.item ~sort:false main_doc in
