Initial commit.

ebuild/version.scm.in

@@ -0,0 +1,29 @@
+;; -*- Mode: Scheme; geiser-scheme-implementation: guile; tab-width: 2 -*-
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; version.scm
+;; Copyright (C) 2025 Cor Legemaat <cor@cor.za.net>
+;;
+;; This file is part of ebuild-autogen: 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, version 3 of the License.
+;;
+;; ebuild-autogen 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 General Public License for
+;; more details.
+;;
+;; You should have received a copy of the GNU General Public License along with
+;; ebuild-autogen. If not, see <https://www.gnu.org/licenses/>.
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(define-module (ebuild version))
+
+(define-public version-str "{{version}}")
+
+(define-public version (map string->number
+                            (string-split version-str #\.)))
+
+(define-public version-major (list-ref version 0))
+(define-public version-minor (list-ref version 1))
+(define-public version-release (list-ref version 2))
+