diff --git a/src/main/version.cl b/src/main/version.cl index 9bcc0d7..a997355 100644 --- a/src/main/version.cl +++ b/src/main/version.cl @@ -23,11 +23,15 @@ (defparameter *clash-minor-version* 0 "Minor release version of CLASH.") +(defparameter *clash-patch-level* 0 + "Current patch-level of CLASH.") + (defun clash-version-string () "Returns a string containing the CLASH release version." - (format nil "~D.~D" + (format nil "~D.~D.~D" *clash-major-version* - *clash-minor-version*)) + *clash-minor-version* + *clash-patch-level*)) ;;;; HTTP Protocol Version Handling diff --git a/src/package.cl b/src/package.cl index ae3922f..dd7d74d 100644 --- a/src/package.cl +++ b/src/package.cl @@ -106,6 +106,7 @@ ;; Version #:*clash-major-version* #:*clash-minor-version* + #:*clash-patch-level* #:clash-version-string #:http-version #:http-version-major