Raymond Toy pushed to branch sparc64-dev at cmucl / cmucl

Commits:

2 changed files:

Changes:

  • bin/create-target.sh
    ... ... @@ -63,6 +63,7 @@ uname_m=`uname -m 2>/dev/null`
    63 63
    case $lisp_variant in
    
    64 64
        *linux*) lvshort=linux;;
    
    65 65
        *freebsd*) lvshort=freebsd;;
    
    66
        *sparc64*) lvshort=solaris64;;
    
    66 67
        *solaris*|sparc*) lvshort=solaris;;
    
    67 68
        *) lvshort=unknown;;
    
    68 69
    esac
    
    ... ... @@ -118,7 +119,8 @@ echo '#error You need to run genesis (via build-world.sh) before compiling the s
    118 119
        cat $setenv_dir/base-features.lisp 
    
    119 120
        case $lvshort in
    
    120 121
    	linux|freebsd) gcname=":gencgc"; sed "s;@@gcname@@;$gcname;" $setenv_dir/$lvshort-features.lisp >> setenv.lisp;;
    
    122
            solaris64) cat $setenv_dir/solaris64-features.lisp;;
    
    121 123
    	solaris) cat $setenv_dir/solaris-features.lisp;;
    
    122 124
    	*) sed "s;@@LISP@@;$lisp_variant;" $setenv_dir/unknown.lisp;;
    
    123
        esac
    
    125
        esac2
    
    124 126
    ) > ../setenv.lisp || quit "Can't create setenv.lisp"

  • src/tools/setenv-scripts/solaris64-features.lisp
    1
    ;; e.g. for Solaris on sparc you probably want some of these:
    
    2
    ;;(pushnew :sparc *features*)
    
    3
    ;;(pushnew :svr4 *features*)
    
    4
    
    
    5
    ;; Solaris supports linkage-table
    
    6
    ;;(pushnew :linkage-table *features*)
    
    7
    
    
    8
    ;; CPU selection:
    
    9
    ;; Sparc-v7 gives us fsqrt instruction
    
    10
    ;;(pushnew :sparc-v7 *features*)
    
    11
    ;;(setf *features* (remove :sparc-v7 *features*))
    
    12
    ;; Sparc-v8 gives us an integer multiply and divide instruction
    
    13
    ;;(pushnew :sparc-v8 *features*)
    
    14
    ;;(setf *features* (remove :sparc-v8 *features*))
    
    15
    ;; Sparc-v9 gives us the extra FP registers, fast bignum multiply and
    
    16
    ;; floor, other float operations available on the Sparc V9, and other
    
    17
    ;; assorted V9 features.
    
    18
    ;;(pushnew :sparc-v9 *features*)
    
    19
    ;;(setf *features* (remove :sparc-v9 *features*))
    
    20
    
    
    21
    ;; This enables some hand-written vops for complex float arithmetic.
    
    22
    ;;
    
    23
    ;;(pushnew :complex-fp-vops *features*)
    
    24
    (pushnew :sparc64 *features*)