Changeset 11610


Ignore:
Timestamp:
Jan 13, 2009, 1:47:57 AM (11 years ago)
Author:
gb
Message:

Put the architecture name and word size in the bundle name. (Note
that this doesn't affect the CFBundle name or the name of the application
memnu.)

Location:
trunk/source/cocoa-ide
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/cocoa-ide/cocoa-application.lisp

    r11544 r11610  
    1919
    2020
    21 (defvar *cocoa-application-path* "ccl:Clozure CL.app;")
     21(defvar *cocoa-application-path*
     22  (multiple-value-bind (os bits cpu) (host-platform)
     23    (declare (ignore os))
     24    (format nil "ccl:Clozure CL-~a~a.app;"
     25            (string-downcase cpu) bits)))
    2226(defvar *cocoa-application-copy-headers-p* nil)
    2327(defvar *cocoa-application-install-altconsole* t)
  • trunk/source/cocoa-ide/cocoa.lisp

    r11543 r11610  
    11(in-package "CCL")
    22
    3 (defvar *cocoa-application-path* #+gz "ccl:GZ temp bundle.app;" #-gz "ccl:temp bundle.app;")
     3(defvar *cocoa-application-path* #+gz "ccl:GZ temp bundle.app;" #-gz
     4        (multiple-value-bind (os bits cpu) (host-platform)
     5          (declare (ignore os))
     6          (format nil "ccl:temp bundle-~a~a.app;"
     7                  (string-downcase cpu) bits)))
    48(defvar *cocoa-application-copy-headers-p* nil)
    59(defvar *cocoa-application-install-altconsole* nil)
Note: See TracChangeset for help on using the changeset viewer.