Raymond Toy pushed to branch issue-365-add-strerror-with-generated-errno-pkg at cmucl / cmucl

Commits:

• 064b90cd
  by Raymond Toy at 2025-02-22T21:15:34-08:00

  Use plain awk and sort to create the file
  
  Modify gen-errno-exports just to print the errno symbols in any order
  without the defpackage form.
  
  Modify create-errno-pkg.sh to sort the output from awk and print the
  defpackage form.
  
  Hopefully this will work on osx without having to install gawk.
  

2 changed files:

• bin/create-errno-pkg.sh
• bin/gen-errno-exports.gawk

Changes:

     Linux) ERRNO_FILES=/usr/include/asm-generic/errno*.h

 	   ;;

 esac

-    

-gawk -f bin/gen-errno-exports.gawk ${ERRNO_FILES}

+

+cat <<EOF

+(defpackage "UNIX-ERRNO"

+  (:export

+`awk -f bin/gen-errno-exports.gawk ${ERRNO_FILES} | sort `

+   ))

+

+EOF

-BEGIN {

-    count = 0

-}

-

 /^#define[ \t]+(E[A-Z0-9]+)[ \t]+([A-Z0-9]+).*$/ {

-    errlist[count] = $2;

-    ++count;

-}

-

-END {

-    asort(errlist)

-    print "(defpackage \"UNIX-ERRNO\""

-    print "  (:export"

-    for (k = 1; k < count; ++k) {

-	printf "   \"%s\"\n", errlist[k];

-    }

-    print "   ))\n"

+    printf "   \"%s\"\n", $2

 }