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

Commits:

3 changed files:

Changes:

  • bin/build.sh
    ... ... @@ -154,13 +154,7 @@ buildit ()
    154 154
     }
    
    155 155
     
    
    156 156
     # Create unix-errno.lisp
    
    157
    -case `uname -s` in
    
    158
    -    Linux) ERRNO_FILES=/usr/include/asm-generic/errno*.h
    
    159
    -	   ;;
    
    160
    -esac
    
    161
    -
    
    162
    -#awk -f bin/create-errno.awk ${ERRNO_FILES} > src/code/unix-errno.lisp
    
    163
    -bin/create-errno.sh ${ERRNO_FILES} > src/code/unix-errno.lisp
    
    157
    +bin/create-errno.sh > src/code/unix-errno.lisp
    
    164 158
     
    
    165 159
     BUILDWORLD="$TOOLDIR/build-world.sh"
    
    166 160
     BUILD_POT="yes"
    

  • bin/create-errno.sh
    1 1
     #! /bin/sh
    
    2 2
     
    
    3
    -# Generates the contents of the file code/unix-errno.lisp.  The args
    
    4
    -# to this script, if supplied, must be a list of files containing the
    
    5
    -# definitions of all the Unix errno values.
    
    6
    -#
    
    3
    +# Generates the contents of the file code/unix-errno.lisp.
    
    4
    +
    
    5
    +# For each supported OS, ERRNO_FILES should be set to a list of all
    
    6
    +# the files that contain the definitions of the errno values.
    
    7
    +case `uname -s` in
    
    8
    +    Linux) ERRNO_FILES=/usr/include/asm-generic/errno*.h
    
    9
    +	   ;;
    
    10
    +esac
    
    11
    +
    
    7 12
     
    
    8 13
     # The header was copied from code/unix.lisp.  This includes all the
    
    9 14
     # support code for DEF-UNIX-ERROR and for all OSes that don't use the
    
    ... ... @@ -251,7 +256,7 @@ EOF
    251 256
     # containing the C definitions.
    
    252 257
     awk '/^#define[ \t]+(E[A-Z0-9]+)[ \t]+([A-Z0-9]+).*$/ {
    
    253 258
         printf "(def-unix-error %s %s)\n", $2, $3;
    
    254
    -}' "$@"
    
    259
    +}' ${ERRNO_FILES}
    
    255 260
     
    
    256 261
     # The tail was also copied from code/unix.lisp.  It's needed to tell
    
    257 262
     # Lisp about the errno values.
    

  • bin/cross-build-world.sh
    ... ... @@ -85,13 +85,7 @@ then
    85 85
     fi
    
    86 86
     
    
    87 87
     # Create unix-errno.lisp
    
    88
    -case `uname -s` in
    
    89
    -    Linux) ERRNO_FILES=/usr/include/asm-generic/errno*.h
    
    90
    -	   ;;
    
    91
    -esac
    
    92
    -
    
    93
    -#awk -f bin/create-errno.awk ${ERRNO_FILES} > src/code/unix-errno.lisp
    
    94
    -bin/create-errno.sh ${ERRNO_FILES} > src/code/unix-errno.lisp
    
    88
    +bin/create-errno.sh > src/code/unix-errno.lisp
    
    95 89
     
    
    96 90
     echo cross boot = $CROSSBOOT
    
    97 91
     $LISP "$@" -noinit -nositeinit <<EOF