Changeset 7295


Ignore:
Timestamp:
Sep 26, 2007, 2:54:27 AM (12 years ago)
Author:
gb
Message:

Also a version-tracking change from trunk.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/working-0709/ccl/level-1/l1-application.lisp

    r6970 r7295  
    183183  "Return a string which (arbitrarily) represents the application version.
    184184Default version returns OpenMCL version info."
    185   (format nil "~&~d.~d~@[.~d~]~@[-~a~]~&"
    186           *openmcl-major-version*
    187           *openmcl-minor-version*
    188           (unless (zerop *openmcl-revision*)
    189             *openmcl-revision*)
    190           *openmcl-suffix*))
     185  (lisp-implementation-version))
    191186
    192187(defmethod application-ui-operation ((a application) operation &rest args)
Note: See TracChangeset for help on using the changeset viewer.