Raymond Toy pushed to branch issue-365-add-strerror at cmucl / cmucl

Commits:

2 changed files:

Changes:

  • bin/build.sh
    ... ... @@ -129,8 +129,10 @@ buildit ()
    129 129
         if [ "$ENABLE" = "yes" ]; 
    
    130 130
         then
    
    131 131
     	$TOOLDIR/clean-target.sh $CLEAN_FLAGS $TARGET || { echo "Failed: $TOOLDIR/clean-target.sh"; exit 1; }
    
    132
    -	# Generate code/unix-errno.lisp
    
    133
    -	$MAKE -C $TARGET/lisp ../code/unix-errno.lisp
    
    132
    +	if [ "$GEN_ERRNO" = "yes" ]; then
    
    133
    +	    # Generate code/unix-errno.lisp
    
    134
    +	    $MAKE -C $TARGET/lisp ../code/unix-errno.lisp
    
    135
    +	fi
    
    134 136
     	time $BUILDWORLD $TARGET $OLDLISP $BOOT || { echo "Failed: $BUILDWORLD"; exit 1; }
    
    135 137
     	if [ "$REBUILD_LISP" = "yes" ]; then
    
    136 138
     	    $TOOLDIR/rebuild-lisp.sh $TARGET
    
    ... ... @@ -154,6 +156,8 @@ buildit ()
    154 156
     BUILDWORLD="$TOOLDIR/build-world.sh"
    
    155 157
     BUILD_POT="yes"
    
    156 158
     UPDATE_TRANS=
    
    159
    +# Set to "yes" if we auto-generate code/unix-errno.lisp.
    
    160
    +GEN_ERRNO=
    
    157 161
     
    
    158 162
     while getopts "123PRGo:b:v:uB:C:Ui:w:O:?" arg
    
    159 163
     do
    
    ... ... @@ -193,7 +197,9 @@ if [ -z "$BASE" ]; then
    193 197
     	    sun4*) BASE=sparc ;;
    
    194 198
     	    i86pc) BASE=sol-x86 ;;
    
    195 199
     	  esac ;;
    
    196
    -      Linux) BASE=linux ;;
    
    200
    +      Linux)
    
    201
    +	  GEN_ERRNO=yes
    
    202
    +	  BASE=linux ;;
    
    197 203
           # Add support for FreeBSD and NetBSD?  Otherwise default to just build.
    
    198 204
           *) BASE=build ;;
    
    199 205
         esac
    

  • src/tools/worldbuild.lisp
    ... ... @@ -139,7 +139,7 @@
    139 139
         ,@(when (or (c:backend-featurep :linux))
    
    140 140
     	;; This is currently only available for some OSes.  Ideally,
    
    141 141
     	;; it should be available for all OSes.
    
    142
    -	"target:code/unix-errno")
    
    142
    +	'("target:code/unix-errno"))
    
    143 143
         ,@(when (c:backend-featurep :mach)
    
    144 144
     	'("target:code/mach"
    
    145 145
     	  "target:code/mach-os"))