mirror of
git://slackware.nl/current.git
synced 2024-12-28 09:59:53 +01:00
7bd3e8d27d
a/hwdata-0.334-noarch-1.txz: Upgraded.
a/kernel-generic-5.4.29-x86_64-1.txz: Upgraded.
a/kernel-huge-5.4.29-x86_64-1.txz: Upgraded.
a/kernel-modules-5.4.29-x86_64-1.txz: Upgraded.
a/pkgtools-15.0-noarch-32.txz: Rebuilt.
installpkg: handle the uninstall script packaged as /install/douninst.sh.
removepkg: add --skip-douninst option to skip running the uninstall script.
Save removed douninst.sh in /var/log/pkgtools/removed_uninstall_scripts.
ap/groff-1.22.4-x86_64-2.txz: Rebuilt.
Fixed docdir. Thanks to Xsane.
d/gcc-9.3.0-x86_64-2.txz: Rebuilt.
d/gcc-brig-9.3.0-x86_64-2.txz: Rebuilt.
d/gcc-g++-9.3.0-x86_64-2.txz: Rebuilt.
d/gcc-gdc-9.3.0-x86_64-2.txz: Rebuilt.
d/gcc-gfortran-9.3.0-x86_64-2.txz: Rebuilt.
Patched a compiler bug concerning assumed-shape vs. deferred-shape arrays.
Thanks to Lockywolf.
d/gcc-gnat-9.3.0-x86_64-2.txz: Rebuilt.
d/gcc-go-9.3.0-x86_64-2.txz: Rebuilt.
d/gcc-objc-9.3.0-x86_64-2.txz: Rebuilt.
d/kernel-headers-5.4.29-x86-1.txz: Upgraded.
d/ruby-2.7.1-x86_64-1.txz: Upgraded.
This update fixes security issues:
Unsafe Object Creation Vulnerability in JSON (Additional fix).
Heap exposure vulnerability in the socket library.
For more information, see:
https://www.ruby-lang.org/en/news/2020/03/19/json-dos-cve-2020-10663/
https://www.ruby-lang.org/en/news/2020/03/31/heap-exposure-in-socket-cve-2020-10933/
https://cve.mitre.org/cgi-bin/cvename.cgi?name=CVE-2020-10663
https://cve.mitre.org/cgi-bin/cvename.cgi?name=CVE-2020-10933
(* Security fix *)
k/kernel-source-5.4.29-noarch-1.txz: Upgraded.
l/graphite2-1.3.14-x86_64-1.txz: Upgraded.
l/librsvg-2.48.2-x86_64-1.txz: Upgraded.
l/utf8proc-2.5.0-x86_64-1.txz: Upgraded.
x/libva-2.7.0-x86_64-1.txz: Upgraded.
x/libva-utils-2.7.1-x86_64-1.txz: Upgraded.
isolinux/initrd.img: Rebuilt.
kernels/*: Upgraded.
usb-and-pxe-installers/usbboot.img: Rebuilt.
40 lines
1.4 KiB
Diff
40 lines
1.4 KiB
Diff
[PATCH] deferred-shape vs assumed-shape
|
|
Steve Kargl sgk@troutmask.apl.washington.edu
|
|
Wed Apr 1 20:04:43 GMT 2020
|
|
|
|
See
|
|
https://stackoverflow.com/questions/60972134/whats-wrong-with-the-following-fortran-code-gfortran-dtio-dummy-argument-at
|
|
|
|
Is A(:) a deferred-shape array or an assumed-shape array? The
|
|
answer of course depends on context.
|
|
|
|
This patch fixes the issue found at the above URL.
|
|
|
|
Index: gcc/fortran/interface.c
|
|
===================================================================
|
|
--- gcc/fortran/interface.c (revision 280157)
|
|
+++ gcc/fortran/interface.c (working copy)
|
|
@@ -4916,10 +4916,15 @@ check_dtio_arg_TKR_intent (gfc_symbol *fsym, bool type
|
|
|| ((type != BT_CLASS) && fsym->attr.dimension)))
|
|
gfc_error ("DTIO dummy argument at %L must be a scalar",
|
|
&fsym->declared_at);
|
|
- else if (rank == 1
|
|
- && (fsym->as == NULL || fsym->as->type != AS_ASSUMED_SHAPE))
|
|
- gfc_error ("DTIO dummy argument at %L must be an "
|
|
- "ASSUMED SHAPE ARRAY", &fsym->declared_at);
|
|
+ else if (rank == 1)
|
|
+ {
|
|
+ if (fsym->as == NULL
|
|
+ || !(fsym->as->type == AS_ASSUMED_SHAPE
|
|
+ || (fsym->as->type == AS_DEFERRED && fsym->attr.dummy
|
|
+ && !fsym->attr.allocatable && !fsym->attr.pointer)))
|
|
+ gfc_error ("DTIO dummy argument at %L must be an "
|
|
+ "ASSUMED-SHAPE ARRAY", &fsym->declared_at);
|
|
+ }
|
|
|
|
if (type == BT_CHARACTER && fsym->ts.u.cl->length != NULL)
|
|
gfc_error ("DTIO character argument at %L must have assumed length",
|
|
|
|
--
|
|
Steve
|
|
|