diff options
Diffstat (limited to 'src/version.ml')
| -rw-r--r-- | src/version.ml | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/src/version.ml b/src/version.ml new file mode 100644 index 0000000..033b60f --- /dev/null +++ b/src/version.ml @@ -0,0 +1,21 @@ +(* + * Copyright (C) 2020 Alban Gruin + * + * ucs is free software: you can redistribute it and/or modify + * it under the terms of the GNU Affero General Public License as published + * by the Free Software Foundation, either version 3 of the License, or + * (at your option) any later version. + * + * ucs is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU Affero General Public License for more details. + * + * You should have received a copy of the GNU Affero General Public License + * along with ucs. If not, see <http://www.gnu.org/licenses/>. + *) + +let version () = + match Build_info.V1.version () with + | Some v -> Build_info.V1.Version.to_string v + | None -> "dev" |