source: trunk/source/level-1/version.lisp

Last change on this file was 16685, checked in by rme, 4 years ago

Update copyright/license headers in files.

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 1.4 KB
Line 
1;;;-*-Mode: LISP; Package: CCL -*-
2;;;
3;;; Copyright 1994-2009 Clozure Associates
4;;;
5;;; Licensed under the Apache License, Version 2.0 (the "License");
6;;; you may not use this file except in compliance with the License.
7;;; You may obtain a copy of the License at
8;;;
9;;;     http://www.apache.org/licenses/LICENSE-2.0
10;;;
11;;; Unless required by applicable law or agreed to in writing, software
12;;; distributed under the License is distributed on an "AS IS" BASIS,
13;;; WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
14;;; See the License for the specific language governing permissions and
15;;; limitations under the License.
16
17(in-package "CCL")
18
19(defparameter *openmcl-major-version* 1)
20(defparameter *openmcl-minor-version* 12)
21(defparameter *openmcl-revision* "dev")
22;;; May be set by xload-level-0
23(defvar *openmcl-svn-revision* nil)
24(defparameter *openmcl-dev-level* nil)
25
26(defparameter *openmcl-version* (format nil "~d.~d~@[-~a~]~@[-r~a~] ~@[+~s~] (~@[~A: ~]~~A)"
27                                        *openmcl-major-version*
28                                        *openmcl-minor-version*
29                                        (unless (null *openmcl-revision*)
30                                          *openmcl-revision*)
31                                        (if (and (typep *openmcl-svn-revision* 'string)
32                                                 (> (length *openmcl-svn-revision*) 0))
33                                          *openmcl-svn-revision*)
34                                        *optional-features*
35                                        *openmcl-dev-level*))
36
37
38
39
40;;; end
Note: See TracBrowser for help on using the repository browser.