Ignore:
Timestamp:
Aug 23, 2005, 12:34:37 PM (15 years ago)
Author:
gb
Message:

Change major version to 1, minor version to 0.
Change format of *OPENMCL-VERSION* format string (move version number before
release level, ~A for platform.)
"Upgrade" ppc32 to release level, ppc64 to beta.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ccl/level-1/version.lisp

    r2347 r2370  
    1717(in-package "CCL")
    1818
    19 (defparameter *openmcl-major-version* 0)
    20 (defparameter *openmcl-minor-version* 14)
    21 (defparameter *openmcl-revision* 4)
    22 (defparameter *openmcl-suffix* "pre-050821a")
     19(defparameter *openmcl-major-version* 1)
     20(defparameter *openmcl-minor-version* 0)
     21(defparameter *openmcl-revision* 0)
     22(defparameter *openmcl-suffix* "pre-050823a")
    2323(defparameter *openmcl-dev-level*
    24   #+ppc64-target "Alpha" #-ppc64-target "Beta")
     24  #+ppc64-target "Beta" #-ppc64-target nil)
    2525
    26 (defparameter *openmcl-version* (format nil "(~A: ~~A) ~d.~d~@[.~d~]~@[-~a~]"
    27                                         *openmcl-dev-level*
     26(defparameter *openmcl-version* (format nil "~d.~d~@[.~d~]~@[-~a~] (~@[~A: ~]~~A)"
    2827                                        *openmcl-major-version*
    2928                                        *openmcl-minor-version*
    3029                                        (unless (zerop *openmcl-revision*)
    3130                                          *openmcl-revision*)
    32                                         *openmcl-suffix*))
     31                                        *openmcl-suffix*
     32                                        *openmcl-dev-level*))
    3333
    3434
Note: See TracChangeset for help on using the changeset viewer.