Marge Bot pushed to branch wip/marge_bot_batch_merge_job at Glasgow Haskell Compiler / GHC
Commits:
-
35b604cc
by Cheng Shao at 2025-12-24T00:11:28-05:00
-
2f304f37
by Wolfgang Jeltsch at 2025-12-24T00:11:29-05:00
9 changed files:
- compiler/GHC/Builtin/Names.hs
- configure.ac
- libraries/ghc-internal/configure.ac
- − m4/find_ghc_bootstrap_prog.m4
- − m4/fp_copy_shellvar.m4
- − m4/fp_prog_ld_flag.m4
- − m4/fp_prog_sort.m4
- m4/prep_target_file.m4
- rts/configure.ac
Changes:
| ... | ... | @@ -339,8 +339,7 @@ basicKnownKeyNames |
| 339 | 339 | getFieldName, setFieldName,
|
| 340 | 340 | |
| 341 | 341 | -- List operations
|
| 342 | - concatName, filterName, mapName,
|
|
| 343 | - zipName, foldrName, buildName, augmentName, appendName,
|
|
| 342 | + mapName, foldrName, buildName, augmentName,
|
|
| 344 | 343 | |
| 345 | 344 | -- FFI primitive types that are not wired-in.
|
| 346 | 345 | stablePtrTyConName, ptrTyConName, funPtrTyConName, constPtrConName,
|
| ... | ... | @@ -694,9 +693,8 @@ ltTag_RDR = nameRdrName ordLTDataConName |
| 694 | 693 | eqTag_RDR = nameRdrName ordEQDataConName
|
| 695 | 694 | gtTag_RDR = nameRdrName ordGTDataConName
|
| 696 | 695 | |
| 697 | -map_RDR, append_RDR :: RdrName
|
|
| 696 | +map_RDR :: RdrName
|
|
| 698 | 697 | map_RDR = nameRdrName mapName
|
| 699 | -append_RDR = nameRdrName appendName
|
|
| 700 | 698 | |
| 701 | 699 | foldr_RDR, build_RDR, returnM_RDR, bindM_RDR, failM_RDR
|
| 702 | 700 | :: RdrName
|
| ... | ... | @@ -1068,7 +1066,7 @@ considerAccessibleName = varQual gHC_INTERNAL_EXTS (fsLit "considerAccessible") |
| 1068 | 1066 | |
| 1069 | 1067 | -- Random GHC.Internal.Base functions
|
| 1070 | 1068 | fromStringName, otherwiseIdName, foldrName, buildName, augmentName,
|
| 1071 | - mapName, appendName, assertName,
|
|
| 1069 | + mapName, assertName,
|
|
| 1072 | 1070 | dollarName :: Name
|
| 1073 | 1071 | dollarName = varQual gHC_INTERNAL_BASE (fsLit "$") dollarIdKey
|
| 1074 | 1072 | otherwiseIdName = varQual gHC_INTERNAL_BASE (fsLit "otherwise") otherwiseIdKey
|
| ... | ... | @@ -1076,7 +1074,6 @@ foldrName = varQual gHC_INTERNAL_BASE (fsLit "foldr") foldrIdKey |
| 1076 | 1074 | buildName = varQual gHC_INTERNAL_BASE (fsLit "build") buildIdKey
|
| 1077 | 1075 | augmentName = varQual gHC_INTERNAL_BASE (fsLit "augment") augmentIdKey
|
| 1078 | 1076 | mapName = varQual gHC_INTERNAL_BASE (fsLit "map") mapIdKey
|
| 1079 | -appendName = varQual gHC_INTERNAL_BASE (fsLit "++") appendIdKey
|
|
| 1080 | 1077 | assertName = varQual gHC_INTERNAL_BASE (fsLit "assert") assertIdKey
|
| 1081 | 1078 | fromStringName = varQual gHC_INTERNAL_DATA_STRING (fsLit "fromString") fromStringClassOpKey
|
| 1082 | 1079 | |
| ... | ... | @@ -1409,12 +1406,6 @@ enumFromThenName = varQual gHC_INTERNAL_ENUM (fsLit "enumFromThen") enumFrom |
| 1409 | 1406 | enumFromThenToName = varQual gHC_INTERNAL_ENUM (fsLit "enumFromThenTo") enumFromThenToClassOpKey
|
| 1410 | 1407 | boundedClassName = clsQual gHC_INTERNAL_ENUM (fsLit "Bounded") boundedClassKey
|
| 1411 | 1408 | |
| 1412 | --- List functions
|
|
| 1413 | -concatName, filterName, zipName :: Name
|
|
| 1414 | -concatName = varQual gHC_INTERNAL_LIST (fsLit "concat") concatIdKey
|
|
| 1415 | -filterName = varQual gHC_INTERNAL_LIST (fsLit "filter") filterIdKey
|
|
| 1416 | -zipName = varQual gHC_INTERNAL_LIST (fsLit "zip") zipIdKey
|
|
| 1417 | - |
|
| 1418 | 1409 | -- Overloaded lists
|
| 1419 | 1410 | isListClassName, fromListName, fromListNName, toListName :: Name
|
| 1420 | 1411 | isListClassName = clsQual gHC_INTERNAL_IS_LIST (fsLit "IsList") isListClassKey
|
| ... | ... | @@ -2201,7 +2192,7 @@ naturalNBDataConKey = mkPreludeDataConUnique 124 |
| 2201 | 2192 | ************************************************************************
|
| 2202 | 2193 | -}
|
| 2203 | 2194 | |
| 2204 | -wildCardKey, absentErrorIdKey, absentConstraintErrorIdKey, augmentIdKey, appendIdKey,
|
|
| 2195 | +wildCardKey, absentErrorIdKey, absentConstraintErrorIdKey, augmentIdKey,
|
|
| 2205 | 2196 | buildIdKey, foldrIdKey, recSelErrorIdKey,
|
| 2206 | 2197 | seqIdKey, eqStringIdKey,
|
| 2207 | 2198 | noMethodBindingErrorIdKey, nonExhaustiveGuardsErrorIdKey,
|
| ... | ... | @@ -2218,7 +2209,6 @@ wildCardKey = mkPreludeMiscIdUnique 0 -- See Note [WildCard |
| 2218 | 2209 | absentErrorIdKey = mkPreludeMiscIdUnique 1
|
| 2219 | 2210 | absentConstraintErrorIdKey = mkPreludeMiscIdUnique 2
|
| 2220 | 2211 | augmentIdKey = mkPreludeMiscIdUnique 3
|
| 2221 | -appendIdKey = mkPreludeMiscIdUnique 4
|
|
| 2222 | 2212 | buildIdKey = mkPreludeMiscIdUnique 5
|
| 2223 | 2213 | foldrIdKey = mkPreludeMiscIdUnique 6
|
| 2224 | 2214 | recSelErrorIdKey = mkPreludeMiscIdUnique 7
|
| ... | ... | @@ -2247,13 +2237,9 @@ divIntIdKey = mkPreludeMiscIdUnique 26 |
| 2247 | 2237 | modIntIdKey = mkPreludeMiscIdUnique 27
|
| 2248 | 2238 | cstringLengthIdKey = mkPreludeMiscIdUnique 28
|
| 2249 | 2239 | |
| 2250 | -concatIdKey, filterIdKey, zipIdKey,
|
|
| 2251 | - bindIOIdKey, returnIOIdKey, newStablePtrIdKey,
|
|
| 2240 | +bindIOIdKey, returnIOIdKey, newStablePtrIdKey,
|
|
| 2252 | 2241 | printIdKey, nullAddrIdKey, voidArgIdKey,
|
| 2253 | 2242 | otherwiseIdKey, assertIdKey :: Unique
|
| 2254 | -concatIdKey = mkPreludeMiscIdUnique 31
|
|
| 2255 | -filterIdKey = mkPreludeMiscIdUnique 32
|
|
| 2256 | -zipIdKey = mkPreludeMiscIdUnique 33
|
|
| 2257 | 2243 | bindIOIdKey = mkPreludeMiscIdUnique 34
|
| 2258 | 2244 | returnIOIdKey = mkPreludeMiscIdUnique 35
|
| 2259 | 2245 | newStablePtrIdKey = mkPreludeMiscIdUnique 36
|
| ... | ... | @@ -57,14 +57,10 @@ dnl ** which are needed by FP_SETUP_PROJECT_VERSION |
| 57 | 57 | |
| 58 | 58 | dnl ** Find find command (for Win32's benefit)
|
| 59 | 59 | FP_PROG_FIND
|
| 60 | -FP_PROG_SORT
|
|
| 61 | 60 | |
| 62 | 61 | dnl ----------------------------------------------------------
|
| 63 | 62 | FP_SETUP_PROJECT_VERSION
|
| 64 | 63 | |
| 65 | -# Hmmm, we fix the RPM release number to 1 here... Is this convenient?
|
|
| 66 | -AC_SUBST([release], [1])
|
|
| 67 | - |
|
| 68 | 64 | dnl * We require autoconf version 2.69 due to
|
| 69 | 65 | dnl https://bugs.ruby-lang.org/issues/8179. Also see #14910.
|
| 70 | 66 | dnl * We need 2.50 due to the use of AC_SYS_LARGEFILE and AC_MSG_NOTICE.
|
| ... | ... | @@ -249,9 +245,6 @@ then |
| 249 | 245 | fi
|
| 250 | 246 | AC_SUBST([WithGhc])
|
| 251 | 247 | |
| 252 | -dnl ** Without optimization some INLINE trickery fails for GHCi
|
|
| 253 | -SRC_CC_OPTS="-O"
|
|
| 254 | - |
|
| 255 | 248 | dnl--------------------------------------------------------------------
|
| 256 | 249 | dnl * Choose host(/target/build) platform
|
| 257 | 250 | dnl--------------------------------------------------------------------
|
| ... | ... | @@ -753,10 +746,6 @@ AC_PROG_LN_S |
| 753 | 746 | dnl ** Find the path to sed
|
| 754 | 747 | AC_PATH_PROGS(SedCmd,gsed sed,sed)
|
| 755 | 748 | |
| 756 | - |
|
| 757 | -dnl ** check for time command
|
|
| 758 | -AC_PATH_PROG(TimeCmd,time)
|
|
| 759 | - |
|
| 760 | 749 | dnl ** check for tar
|
| 761 | 750 | dnl if GNU tar is named gtar, look for it first.
|
| 762 | 751 | AC_PATH_PROGS(TarCmd,gnutar gtar tar,tar)
|
| ... | ... | @@ -23,7 +23,7 @@ AC_MSG_RESULT($WINDOWS) |
| 23 | 23 | AC_CHECK_TYPES([long long])
|
| 24 | 24 | |
| 25 | 25 | # check for specific header (.h) files that we are interested in
|
| 26 | -AC_CHECK_HEADERS([ctype.h errno.h fcntl.h inttypes.h limits.h signal.h sys/file.h sys/resource.h sys/select.h sys/stat.h sys/syscall.h sys/time.h sys/timeb.h sys/timers.h sys/times.h sys/types.h sys/utsname.h sys/wait.h termios.h time.h unistd.h utime.h windows.h winsock.h langinfo.h poll.h sys/epoll.h sys/event.h sys/eventfd.h sys/socket.h])
|
|
| 26 | +AC_CHECK_HEADERS([ctype.h errno.h fcntl.h inttypes.h limits.h signal.h sys/resource.h sys/select.h sys/stat.h sys/syscall.h sys/time.h sys/timeb.h sys/timers.h sys/times.h sys/types.h sys/utsname.h sys/wait.h termios.h unistd.h utime.h windows.h winsock.h langinfo.h poll.h sys/epoll.h sys/event.h sys/eventfd.h sys/socket.h])
|
|
| 27 | 27 | |
| 28 | 28 | # Enable large file support. Do this before testing the types ino_t, off_t, and
|
| 29 | 29 | # rlim_t, because it will affect the result of that test.
|
| 1 | -# FIND_GHC_BOOTSTRAP_PROG()
|
|
| 2 | -# --------------------------------
|
|
| 3 | -# Parse the bootstrap GHC's compiler settings file for the location of things
|
|
| 4 | -# like the `llc` and `opt` commands.
|
|
| 5 | -#
|
|
| 6 | -# $1 = the variable to set
|
|
| 7 | -# $2 = The bootstrap compiler.
|
|
| 8 | -# $3 = The string to grep for to find the correct line.
|
|
| 9 | -#
|
|
| 10 | -AC_DEFUN([FIND_GHC_BOOTSTRAP_PROG],[
|
|
| 11 | - BootstrapTmpCmd=`grep $3 $($2 --print-libdir)/settings 2>/dev/null | sed 's/.*", "//;s/".*//'`
|
|
| 12 | - if test -n "$BootstrapTmpCmd" && test `basename $BootstrapTmpCmd` = $BootstrapTmpCmd ; then
|
|
| 13 | - AC_PATH_PROG([$1], [$BootstrapTmpCmd], "")
|
|
| 14 | - else
|
|
| 15 | - $1=$BootstrapTmpCmd
|
|
| 16 | - fi
|
|
| 17 | -]) |
| 1 | -# Helper for cloning a shell variable's state
|
|
| 2 | -AC_DEFUN([FP_COPY_SHELLVAR],
|
|
| 3 | -[if test -n "${$1+set}"; then $2="$$1"; else unset $2; fi ]) |
| 1 | -# FP_PROG_LD_FLAG
|
|
| 2 | -# ---------------
|
|
| 3 | -# Sets the output variable $2 to $1 if ld supports the $1 flag.
|
|
| 4 | -# Otherwise the variable's value is empty.
|
|
| 5 | -AC_DEFUN([FP_PROG_LD_FLAG],
|
|
| 6 | -[
|
|
| 7 | -AC_CACHE_CHECK([whether ld understands $1], [fp_cv_$2],
|
|
| 8 | -[echo 'int foo() { return 0; }' > conftest.c
|
|
| 9 | -${CC-cc} -c conftest.c
|
|
| 10 | -if $LD -r $1 -o conftest2.o conftest.o > /dev/null 2>&1; then
|
|
| 11 | - fp_cv_$2=$1
|
|
| 12 | -else
|
|
| 13 | - fp_cv_$2=
|
|
| 14 | -fi
|
|
| 15 | -rm -rf conftest*])
|
|
| 16 | -$2=$fp_cv_$2
|
|
| 17 | -])# FP_PROG_LD_FLAG |
| 1 | -# FP_PROG_SORT
|
|
| 2 | -# ------------
|
|
| 3 | -# Find a Unix-like sort
|
|
| 4 | -AC_DEFUN([FP_PROG_SORT],
|
|
| 5 | -[AC_PATH_PROG([fp_prog_sort], [sort])
|
|
| 6 | -echo conwip > conftest.txt
|
|
| 7 | -$fp_prog_sort -f conftest.txt > conftest.out 2>&1
|
|
| 8 | -if grep 'conwip' conftest.out > /dev/null 2>&1 ; then
|
|
| 9 | - # The goods
|
|
| 10 | - SortCmd="$fp_prog_sort"
|
|
| 11 | -else
|
|
| 12 | - # Summink else..pick next one.
|
|
| 13 | - AC_MSG_WARN([$fp_prog_sort looks like a non-*nix sort, ignoring it])
|
|
| 14 | - FP_CHECK_PROG([SortCmd], [sort], [], [], [$fp_prog_sort])
|
|
| 15 | -fi
|
|
| 16 | -rm -f conftest.txt conftest.out
|
|
| 17 | -AC_SUBST([SortCmd])[]dnl
|
|
| 18 | -])# FP_PROG_SORT |
| ... | ... | @@ -229,5 +229,3 @@ AC_DEFUN([PREP_TARGET_FILE],[ |
| 229 | 229 | esac
|
| 230 | 230 | AC_SUBST([TargetEndianness])
|
| 231 | 231 | ]) |
| 232 | - |
|
| 233 | -AC_DEFUN() |
| ... | ... | @@ -96,7 +96,7 @@ dnl off_t, because it will affect the result of that test. |
| 96 | 96 | AC_SYS_LARGEFILE
|
| 97 | 97 | |
| 98 | 98 | dnl ** check for specific header (.h) files that we are interested in
|
| 99 | -AC_CHECK_HEADERS([ctype.h dirent.h dlfcn.h errno.h fcntl.h grp.h limits.h locale.h nlist.h pthread.h pwd.h signal.h sys/param.h sys/mman.h sys/resource.h sys/select.h sys/time.h sys/timeb.h sys/timerfd.h sys/timers.h sys/times.h sys/utsname.h sys/wait.h termios.h utime.h windows.h winsock.h sched.h])
|
|
| 99 | +AC_CHECK_HEADERS([ctype.h dlfcn.h errno.h fcntl.h limits.h locale.h nlist.h pthread.h signal.h sys/param.h sys/mman.h sys/resource.h sys/select.h sys/time.h sys/timeb.h sys/timerfd.h sys/timers.h sys/times.h sys/utsname.h sys/wait.h termios.h utime.h windows.h winsock.h sched.h])
|
|
| 100 | 100 | |
| 101 | 101 | dnl sys/cpuset.h needs sys/param.h to be included first on FreeBSD 9.1; #7708
|
| 102 | 102 | AC_CHECK_HEADERS([sys/cpuset.h], [], [],
|
| ... | ... | @@ -148,7 +148,7 @@ FP_CHECK_FUNC([GetModuleFileName], |
| 148 | 148 | |
| 149 | 149 | dnl ** check for more functions
|
| 150 | 150 | dnl ** The following have been verified to be used in ghc/, but might be used somewhere else, too.
|
| 151 | -AC_CHECK_FUNCS([getclock getrusage gettimeofday setitimer siginterrupt sysconf times ctime_r sched_setaffinity sched_getaffinity setlocale uselocale])
|
|
| 151 | +AC_CHECK_FUNCS([getclock getrusage gettimeofday sysconf times ctime_r sched_setaffinity sched_getaffinity uselocale])
|
|
| 152 | 152 | |
| 153 | 153 | dnl ** On OS X 10.4 (at least), time.h doesn't declare ctime_r if
|
| 154 | 154 | dnl ** _POSIX_C_SOURCE is defined
|
| ... | ... | @@ -488,5 +488,3 @@ cat ghcautoconf.h.autoconf | sed \ |
| 488 | 488 | >> include/ghcautoconf.h
|
| 489 | 489 | echo "#endif /* __GHCAUTOCONF_H__ */" >> include/ghcautoconf.h
|
| 490 | 490 | ] |
| 491 | - |
|
| 492 | - |