package commons

  1. Overview
  2. Docs
package commons
Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source

Source file String_utils.ml

1
2
3
4
5
open Common

let unit_str ?(pad = false) count str =
  let str = if count <> 1 then str ^ "s" else if pad then str ^ " " else str in
  spf "%d %s" count str