Mock Version: 4.1 Mock Version: 4.1 Mock Version: 4.1 ENTER ['do_with_status'](['bash', '--login', '-c', '/usr/bin/rpmbuild -bs --noclean --target x86_64 --nodeps /builddir/build/SPECS/f2c.spec'], chrootPath='/var/lib/mock/dist-oc9-epol-build-80734-53835/root'env={'TERM': 'vt100', 'SHELL': '/bin/bash', 'HOME': '/builddir', 'HOSTNAME': 'mock', 'PATH': '/usr/bin:/bin:/usr/sbin:/sbin', 'PROMPT_COMMAND': 'printf "\\033]0;\\007"', 'PS1': ' \\s-\\v\\$ ', 'LANG': 'C.UTF-8'}shell=Falselogger=timeout=86400uid=991gid=135user='mockbuild'nspawn_args=[]unshare_net=TrueprintOutput=False) Executing command: ['bash', '--login', '-c', '/usr/bin/rpmbuild -bs --noclean --target x86_64 --nodeps /builddir/build/SPECS/f2c.spec'] with env {'TERM': 'vt100', 'SHELL': '/bin/bash', 'HOME': '/builddir', 'HOSTNAME': 'mock', 'PATH': '/usr/bin:/bin:/usr/sbin:/sbin', 'PROMPT_COMMAND': 'printf "\\033]0;\\007"', 'PS1': ' \\s-\\v\\$ ', 'LANG': 'C.UTF-8'} and shell False Building target platforms: x86_64 Building for target x86_64 Wrote: /builddir/build/SRPMS/f2c-20210928-1.oc9.src.rpm Child return code was: 0 ENTER ['do_with_status'](['bash', '--login', '-c', '/usr/bin/rpmbuild -bb --noclean --target x86_64 --nodeps --nocheck /builddir/build/SPECS/f2c.spec'], chrootPath='/var/lib/mock/dist-oc9-epol-build-80734-53835/root'env={'TERM': 'vt100', 'SHELL': '/bin/bash', 'HOME': '/builddir', 'HOSTNAME': 'mock', 'PATH': '/usr/bin:/bin:/usr/sbin:/sbin', 'PROMPT_COMMAND': 'printf "\\033]0;\\007"', 'PS1': ' \\s-\\v\\$ ', 'LANG': 'C.UTF-8'}shell=Falselogger=timeout=86400uid=991gid=135user='mockbuild'nspawn_args=[]unshare_net=TrueprintOutput=False) Executing command: ['bash', '--login', '-c', '/usr/bin/rpmbuild -bb --noclean --target x86_64 --nodeps --nocheck /builddir/build/SPECS/f2c.spec'] with env {'TERM': 'vt100', 'SHELL': '/bin/bash', 'HOME': '/builddir', 'HOSTNAME': 'mock', 'PATH': '/usr/bin:/bin:/usr/sbin:/sbin', 'PROMPT_COMMAND': 'printf "\\033]0;\\007"', 'PS1': ' \\s-\\v\\$ ', 'LANG': 'C.UTF-8'} and shell False Building target platforms: x86_64 Building for target x86_64 Executing(%prep): /bin/sh -e /var/tmp/rpm-tmp.cYFYkY + umask 022 + cd /builddir/build/BUILD + cd /builddir/build/BUILD + rm -rf f2c-20210928 + /usr/bin/mkdir -p f2c-20210928 + cd f2c-20210928 + /usr/lib/rpm/rpmuncompress -x /builddir/build/SOURCES/src.tgz + STATUS=0 + '[' 0 -ne 0 ']' + /usr/bin/chmod -Rf a+rX,u+w,g-w,o-w . + mkdir libf2c + unzip -qq /builddir/build/SOURCES/libf2c.zip -d libf2c + /usr/lib/rpm/rpmuncompress /builddir/build/SOURCES/f2c-20110801.patch + /usr/bin/patch -p1 -s --fuzz=0 --no-backup-if-mismatch -f + /usr/lib/rpm/rpmuncompress /builddir/build/SOURCES/libf2c-20110801-format-security.patch + /usr/bin/patch -p1 -s --fuzz=0 --no-backup-if-mismatch -f + sed -i s/@SOVER@/0.23/ libf2c/makefile.u + cp /builddir/build/SOURCES/f2c.pdf /builddir/build/SOURCES/f2c.ps /builddir/build/SOURCES/fc . + RPM_EC=0 ++ jobs -p + exit 0 Executing(%build): /bin/sh -e /var/tmp/rpm-tmp.evAC34 + umask 022 + cd /builddir/build/BUILD + CFLAGS='-O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection' + export CFLAGS + CXXFLAGS='-O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection' + export CXXFLAGS + FFLAGS='-O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -I/usr/lib64/gfortran/modules' + export FFLAGS + FCFLAGS='-O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -I/usr/lib64/gfortran/modules' + export FCFLAGS + LDFLAGS='-Wl,-z,relro -Wl,--as-needed -Wl,-z,now -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-ld -Wl,--build-id=sha1' + export LDFLAGS + LT_SYS_LIBRARY_PATH=/usr/lib64: + export LT_SYS_LIBRARY_PATH + CC=gcc + export CC + CXX=g++ + export CXX + cd f2c-20210928 + make -C src -f makefile.u -j32 'CFLAGS=-O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection' f2c make: Entering directory '/builddir/build/BUILD/f2c-20210928/src' cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection main.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection init.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection gram.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection lex.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection proc.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection equiv.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection data.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection format.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection expr.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection exec.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection intr.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection io.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection misc.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection error.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection mem.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection names.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection output.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection p1output.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection pread.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection put.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection putpcc.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection vax.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection formatdata.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection parse_args.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection niceprintf.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection cds.c if cc sysdeptest.c; then echo '/*OK*/' > sysdep.hd;\ elif cc -DNO_MKDTEMP sysdeptest.c; then echo '#define NO_MKDTEMP' >sysdep.hd;\ else echo '#define NO_MKDTEMP' >sysdep.hd; echo '#define NO_MKSTEMP' >>sysdep.hd; fi cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection version.c proc.c: In function 'fix_entry_returns': proc.c:140:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 140 | if (a = xretslot[i]) | ^ proc.c:163:23: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 163 | while(e = e->entnextp); | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { proc.c: In function 'putentries': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { proc.c:247:63: warning: array subscript has type 'char' [-Wchar-subscripts] 247 | : dfltarg[((Namep)args->datap)->vtype]); | ~~~~~~~~~~~~~~~~~~~~^~~~~~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { proc.c:250:29: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 250 | if (np = *a) | ^~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { proc.c:270:23: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 270 | while(e = e->entnextp); | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { proc.c: In function 'entry_goto': proc.c:287:15: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 287 | while(e = e->entnextp) | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { proc.c: In function 'zap_changes': proc.c:322:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 322 | if (at = ((Namep)cp->datap)->arginfo) | ^~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { misc.c: In function 'revchain': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { misc.c:267:15: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 267 | while(p = next) { | ^ misc.c: In function 'addunder': misc.c:292:15: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 292 | while(c = *s++) | ^ io.c:275:29: warning: missing braces around initializer [-Wmissing-braces] 275 | LOCAL io_setup io_stuff[] = { | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { proc.c: In function 'enddcl': proc.c:405:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 405 | if (ep = ep0 = (struct Entrypoint *)revchain((chainp)entries)) { | ^~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { proc.c:408:31: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 408 | while(ep = ep->entnextp); | ^~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { misc.c: In function 'mkname': io.c: In function 'endioctl': io.c:437:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 437 | if(p = V(IOSEND)) | ^ misc.c:428:15: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 428 | while(c = *s++) { | ^ io.c:437:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 437 | if(p = V(IOSEND)) | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { io.c:443:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 443 | if(p = V(IOSERR)) | ^ io.c:443:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 443 | if(p = V(IOSERR)) | ^ misc.c:441:15: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 441 | while(q = hp->varp) | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { misc.c:462:15: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 462 | while(*t = *s++) | ^ io.c: In function 'iocname': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { io.c:551:19: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 551 | if(!strcmp(ioc[i].iocname, token)) | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { misc.c: In function 'execlab': misc.c:524:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 524 | if(lp = mklabel(stateno)) | ^~ proc.c: In function 'dim_finish': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { proc.c:697:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 697 | if (q = p->dims[i].dimexpr) { | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { proc.c:702:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 702 | if (q = p->basexpr) | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { proc.c: In function 'doentry': proc.c:744:32: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 744 | if(procclass == CLMAIN && !ep->arglist || procclass == CLBLOCK) | ~~~~~~~~~~~~~~~~~~~~^~~~~~~~~~~~~~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { misc.c: In function 'frexchain': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { misc.c:702:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 702 | if (q = *p) { | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { io.c: In function 'startrw': io.c:954:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 954 | if(p = V(IOSUNIT)) | ^ In file included from proc.c:24: proc.c:825:61: warning: array subscript has type 'char' [-Wchar-subscripts] 825 | dflttype[letter(np->fvarname[0])]; | ~~~~~~~~~~~~^~~ defs.h:739:27: note: in definition of macro 'letter' 739 | #define letter(x) Letters[x] | ^ init.c: In function 'fileinit': init.c:319:54: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 319 | for(j = 0, s = "abcdefghijklmnopqrstuvwxyz"; i = *s++; j++) | ^ io.c:974:36: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 974 | if(nump = np->vdim->nelt) | ^~~~ lex.c:160:1: warning: missing braces around initializer [-Wmissing-braces] 160 | { | ^ 161 | '(', SLPAR, | { } 162 | ')', SRPAR, | { } 163 | '=', SEQUALS, | { } 164 | ',', SCOMMA, | { } 165 | '+', SPLUS, | { } 166 | '-', SMINUS, | { } 167 | '*', SSTAR, | { } 168 | '/', SSLASH, | { } 169 | '$', SCURRENCY, | { } 170 | ':', SCOLON, | { } 171 | '<', SLT, | { } 172 | '>', SGT, | { } 173 | 0, 0 }; | { } io.c:1009:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1009 | if(p = V(IOSREC)) | ^ init.c: In function 'hashclear': lex.c:176:1: warning: missing braces around initializer [-Wmissing-braces] 176 | { | ^ 177 | "and.", SAND, | { } 178 | "or.", SOR, | { } 179 | "not.", SNOT, | { } 180 | "true.", STRUE, | { } 181 | "false.", SFALSE, | { } 182 | "eq.", SEQ, | { } 183 | "ne.", SNE, | { } 184 | "lt.", SLT, | { } 185 | "le.", SLE, | { } 186 | "gt.", SGT, | { } 187 | "ge.", SGE, | { } 188 | "neqv.", SNEQV, | { } 189 | "eqv.", SEQV, | { } 190 | 0, 0 }; | { } init.c:364:20: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 364 | if(p = hp->varp) | ^ init.c:367:28: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 367 | if(q = p->vdim) | ^ io.c:1025:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1025 | if(p = V(IOSFMT)) | ^ format.c: In function 'start_formatting': format.c:155:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 155 | if (infile = fopen (p1_file, binread)) { | ^~~~~~ io.c:1059:36: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 1059 | || p->tag == TADDR && ISINT(p->addrblock.vtype)) proc.c: In function 'dobss': data.c: In function 'nextdata': equiv.c: In function 'doequiv': data.c:189:42: warning: array subscript has type 'char' [-Wchar-subscripts] 189 | off = typesize[np->vtype] * curdtelt; | ~~^~~~~~~ equiv.c:167:28: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 167 | if(np = q->eqvitem.eqvname) | ^~ proc.c:934:20: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 934 | if(q = p->varp) | ^ lex.c: In function 'doinclude': io.c: In function 'dofopen': formatdata.c: In function 'list_init_data': niceprintf.c: In function 'fwd_strcpy': put.c: In function 'putconst': expr.c: In function 'mkconv': io.c:1195:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 1195 | if( (p = V(IOSFILE)) ) | ^ misc.c: In function 'struct_eq': lex.c:382:37: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 382 | if (fp = fopen(name, textread)) { | ^~ proc.c: In function 'iarrlen': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { pread.c: In function 'readref': cds.c: In function 'cds': niceprintf.c:205:9: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 205 | { while(*t++ = *s++); } | ^ formatdata.c:54:9: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 54 | if (status = dsort(Inname, sortfname)) | ^~~~~~ put.c:386:37: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 385 | cd[1] == litp->litval.litdval[1] | ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 386 | && !strcmp(ds[1], litp->cds[1]))) { | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ expr.c:347:43: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 347 | else if( ISCONST(p) && pt!=TYADDR && pt != TYCHAR format.c: In function 'addrlit': cds.c:109:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 109 | if (et = etype[(unsigned char)c]) { | ^~ pread.c:254:43: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 254 | || type != TYFTNLEN + 100 && type % 100 > TYSUBR) exec.c: In function 'mixed_type': data.c:216:55: warning: array subscript has type 'char' [-Wchar-subscripts] 216 | else *elenp = typesize[q->headblock.vtype]; | ~~~~~~~~~~~~^~~~~~ parse_args.c: In function 'lower_string': p1output.c: In function 'p1_comment': names.c: In function 'wr_globals': mem.c: In function 'other_undefs': gram.c: In function 'yyparse': equiv.c:170:35: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 170 | if(np->vstg==STGEQUIV) | ^ p1output.c:71:59: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 71 | || pointer > ustr && pointer[-1] == '/')) | ~~~~~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~ proc.c:992:26: warning: array subscript has type 'char' [-Wchar-subscripts] 992 | leng = typesize[q->vtype]; | ~^~~~~~~ misc.c:1313:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1313 | if (d1 = v1->vdim) { | ^~ names.c:368:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 368 | if (y = x % hsize) | ^ parse_args.c:416:16: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 416 | while (*dest++ = (c = *src++) >= 'A' && c <= 'Z' ? tolower(c) : c); | ^ mem.c:264:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 264 | if (d = define_list) { | ^ io.c:1203:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1203 | if(p = V(IOSRECL)) | ^ exec.c:350:29: warning: array subscript has type 'char' [-Wchar-subscripts] 350 | ftn_types[np->vtype], np->fvarname); | ~~^~~~~~~ format.c:446:27: warning: dereferencing type-punned pointer will break strict-aliasing rules [-Wstrict-aliasing] 446 | *((union Constant *) &(litp->litval)); | ~^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ expr.c:353:30: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 353 | if (ISINT(t) && ISINT(pt) || ISREAL(t) && ISREAL(pt)) { data.c:221:46: warning: array subscript has type 'char' [-Wchar-subscripts] 221 | : typesize[np->vtype]; | ~~^~~~~~~ mem.c:269:31: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 269 | while(d = d->next); | ^ gram.c:1312:56: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 1312 | && (np->vtype != TYCHAR || np->vdim && !pp->argsp)) | ~~~~~~~~~^~~~~~~~~~~~~ lex.c: In function 'putlineno': proc.c:995:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 995 | if(q->vdim) | ^ vax.c: In function 'make_int_expr': lex.c:484:29: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 484 | if (lastfile = infname) { | ^~~~~~~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { equiv.c: In function 'eqvcommon': vax.c:161:29: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 161 | if (e1 = e->addrblock.memoffset) | ^~ io.c: In function 'dofinquire': lex.c:483:20: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 483 | if (lastfile != infname) | ^ equiv.c:265:20: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 265 | if(np = q->eqvitem.eqvname) | ^~ vax.c:167:33: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 165 | || e->addrblock.vstg == STGCOMMON | ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 166 | && e->addrblock.uname_tag == UNAM_NAME | ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 167 | && e->addrblock.user.name->vcommequiv) | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ proc.c:999:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 999 | if(q->vleng) | ^ main.c: In function 'write_typedefs': io.c:1240:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1240 | if(p = V(IOSUNIT)) | ^ expr.c: In function 'cpexpr': main.c:363:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 363 | if (s = usedcasts[i]) { | ^ expr.c:456:30: warning: array subscript has type 'char' [-Wchar-subscripts] 456 | e = cpblock(blksize[p->tag], (char *)p); | ~^~~~~ main.c:380:33: warning: array subscript has type 'char' [-Wchar-subscripts] 380 | if (used_rets[st[i]]) | ~~^~~ output.c: In function 'out_name': expr.c:478:20: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 478 | if(pp = p->listblock.listp) | ^~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { main.c:384:53: warning: array subscript has type 'char' [-Wchar-subscripts] 384 | stl[i], ftn_types[st[i]]); | ~~^~~ output.c:457:39: warning: array subscript has type 'char' [-Wchar-subscripts] 457 | nice_printf(fp, xretslot[namep->vtype]->user.ident); | ~~~~~^~~~~~~ vax.c: In function 'count_args': formatdata.c: In function 'write_char_init': vax.c:241:29: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 241 | if (q = (Namep)cp->datap) | ^ p1output.c: In function 'p1_addr': lex.c: In function 'getcds': formatdata.c:221:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 221 | if (dimp = namep->vdim) | ^~~~ p1output.c:261:49: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 261 | || ONEOF(stg, M(STGCOMMON)|M(STGEQUIV)) && proc.c: In function 'docommon': putpcc.c: In function 'putif': lex.c:602:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 602 | if(code == STEOF) | ^ data.c: In function 'dataname': putpcc.c:107:29: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 107 | if (*ei_next++ = ftell(pass1_file) > p1_where) { | ^ p1output.c:267:66: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 267 | || ONEOF(stg, M(STGBSS)|M(STGINIT)|M(STGAUTO)|M(STGARG)) && vax.c: In function 'aawalk': main.c: In function 'commonprotos': vax.c:267:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 267 | if (q = P->fcharp) | ^ data.c:400:15: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 400 | while(*t++ = *s++); | ^ proc.c:1089:20: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1089 | if(t = comvar->vdim) | ^ vax.c:269:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 269 | if (q = P->lcharp) | ^ main.c:419:25: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 419 | if (at = e->arginfo) { | ^~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { vax.c: In function 'afwalk': In file included from expr.c:24: expr.c: In function 'wronginf': vax.c:296:34: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 296 | && q->primblock.namep->vprocclass main.c:417:20: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 417 | if (e->extstg == STGEXT | ^ proc.c:1089:19: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 1089 | if(t = comvar->vdim) | ^ expr.c:587:32: warning: array subscript has type 'char' [-Wchar-subscripts] 587 | c = letter(np->fvarname[0]); | ~~~~~~~~~~~~^~~ defs.h:739:27: note: in definition of macro 'letter' 739 | #define letter(x) Letters[x] | ^ main.c: In function 'I_args': exec.c: In function 'exenddo': main.c:471:43: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 471 | && (s[3] || s[2] != '2' && s[2] != '4')) | ~~~~~~~~~~~~^~~~~~~~~~~~~~ exec.c:693:22: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 693 | || here >= 0 && (!thislabel || thislabel->labelno != here)) { | ~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ main.c: In function 'omit_non_f': main.c:489:24: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 489 | for(i = k = 0; s = ftn_files[k]; k++) { | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { exec.c:699:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 699 | if (np1 = ctlstack->loopname) | ^~~ output.c: In function 'out_addr': output.c:606:55: warning: array subscript has type 'char' [-Wchar-subscripts] 606 | xretslot[addrp->vtype]->user.ident); | ~~~~~^~~~~~~ exec.c: In function 'enddo': proc.c: In function 'freetemps': exec.c:731:20: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 731 | if(np = ctlstack->donamep) | ^~ output.c:642:40: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 642 | if ((addrp->uname_tag == UNAM_NAME && addrp->user.name->vdim | ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~~~~~ formatdata.c: In function 'wr_one_init': exec.c:738:28: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 738 | if(ap = memversion(np)) | ^~ formatdata.c:393:8: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 393 | if (type == TYCHAR) | ^ proc.c:1205:15: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1205 | while(p = p1) { | ^ expr.c: In function 'fixexpr': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { formatdata.c:278:17: warning: unused variable 'datachar' [-Wunused-variable] 278 | extern char datachar[]; | ^~~~~~~~ vax.c: In function 'prolog': io.c: In function 'iosetip': vax.c:466:16: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 466 | if(dp = q->vdim) /* if this param is an array ... */ | ^~ exec.c:746:29: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 746 | if (e = ctlstack->dostep) | ^ expr.c:738:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 738 | if(rp = p->rightp) | ^~ rm -f a.out cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection sysdep.c In file included from defs.h:27, from output.c:24: output.c:660:38: warning: array subscript has type 'char' [-Wchar-subscripts] 660 | ICON (typesize[addrp -> vtype] * (addrp -> Field ? 2 : 1))); | ~~~~~~^~~~~~~~ defines.h:294:36: note: in definition of macro 'ICON' 294 | #define ICON(z) mkintcon( (ftnint)(z) ) | ^ format.c: In function 'do_p1_extern': gram.c:855:1: warning: label 'yyerrlab' defined but not used [-Wunused-label] 855 | yyerrlab: | ^~~~~~~~ format.c:924:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 924 | if (addrp->vtype = extsymtab[addrp->memno].extype) | ^~~~~ io.c:1480:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1480 | if(p = V(i)) | ^ main.c: In function 'main': exec.c:746:28: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 746 | if (e = ctlstack->dostep) | ^ output.c:681:25: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 681 | && addrp->user.name->vprocclass == PTHISPROC) && main.c:653:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 653 | if(k = yyparse()) | ^ vax.c:511:35: warning: array subscript has type 'char' [-Wchar-subscripts] 511 | size = typesize[ q->vtype ]; | ~^~~~~~~ exec.c:751:29: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 751 | if (e = ctlstack->domax) | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { vax.c:512:19: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 512 | if(q->vtype == TYCHAR) | ^ expr.c:796:57: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 796 | || rtype == TYDREAL && ltype == TYREAL && !ISCONST(rp)) exec.c:751:28: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 751 | if (e = ctlstack->domax) | ^ exec.c:756:29: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 756 | if (e = ctlstack->doinit) | ^ main.c: In function 'opf': proc.c: In function 'comblock': main.c:747:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 747 | if( fp = fopen(fn, mode) ) | ^~ format.c: In function 'length_comp': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { putpcc.c: In function 'putcx1': proc.c:1395:28: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1395 | for(i = 0; c = *t = *s++; t++) | ^ format.c:1074:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1074 | if (arg = (Namep)args->datap) { | ^~~ putpcc.c:686:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 686 | if (q = resp->memoffset) { | ^ putpcc.c:694:57: warning: array subscript has type 'char' [-Wchar-subscripts] 694 | tskludge = typesize[resp->vtype] | ~~~~^~~~~~~ pread.c: In function 'Pfile': putpcc.c:703:51: warning: array subscript has type 'char' [-Wchar-subscripts] 703 | ts = typesize[resp->vtype] | ~~~~^~~~~~~ format.c:1090:44: warning: array subscript has type 'char' [-Wchar-subscripts] 1090 | a = at->atypes + init_ac[np->vtype]; | ~~^~~~~~~ pread.c:892:29: warning: array subscript has type 'char' [-Wchar-subscripts] 892 | Pct[*s] = P_space; | ^~ lex.c: In function 'getcd': formatdata.c: In function 'make_one_const': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { format.c:1093:29: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1093 | if (arg = (Namep)args1->datap) | ^~~ lex.c:1030:19: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 1030 | if( !isspace(*p) ) | ^ pread.c:894:29: warning: array subscript has type 'char' [-Wchar-subscripts] 894 | Pct[*s] = P_delim; | ^~ putpcc.c:760:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 760 | if(lp = putcx1(p->exprblock.leftp) ) | ^~ formatdata.c:706:13: warning: this 'while' clause does not guard... [-Wmisleading-indentation] 706 | while (index > main_index++) | ^~~~~ proc.c: In function 'settype': putpcc.c:762:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 762 | if(rp = putcx1(p->exprblock.rightp) ) | ^~ formatdata.c:709:17: note: ...this statement, but the latter is misleadingly indented as if it were guarded by the 'while' 709 | k = (int)(Addr)(((chainp)values->datap)->nextp->nextp->datap); | ^ pread.c:897:55: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 897 | for(s = "abcdefghijklmnopqrstuvwxyz"; i = *s; s++) | ^ lex.c: In function 'adjtoklen': proc.c:1480:25: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 1479 | || v->vtype != type | ~~~~~~~~~~~~~~~~ 1480 | && (v->vimpltype || v->vinftype || v->vinfproc)) | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ formatdata.c:730:31: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 730 | while(vals = vals->nextp); | ^~~~ format.c: In function 'listargs': lex.c:1060:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1060 | if (token = (char *)realloc(token, maxtoklen)) | ^~~~~ pread.c:907:44: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 907 | || !strcmp(Ptok, "extern") && (i = Ptoken(pf,0)) != P_anum) | ^ In file included from defs.h:27: expr.c: In function 'mkscalar': format.c:1153:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1153 | if (arg = (Namep)args->datap) { | ^~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { pread.c:918:23: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 918 | while(i = Ptype(pf)) { | ^ expr.c:1017:45: warning: array subscript has type 'char' [-Wchar-subscripts] 1017 | (tagptr)ICON(typesize[np->vtype]) ), | ~~^~~~~~~ defines.h:294:36: note: in definition of macro 'ICON' 294 | #define ICON(z) mkintcon( (ftnint)(z) ) | ^ proc.c:1482:19: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 1482 | if( (v->vtype = lengtype(type, length))==TYCHAR ) | ^ pread.c: In function 'read_Pfiles': expr.c: In function 'mkfunct': pread.c:960:15: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 960 | while(s = *ffiles++) | ^ expr.c:1078:49: warning: dereferencing type-punned pointer will break strict-aliasing rules [-Wstrict-aliasing] 1078 | && (zflag || !(*(struct Intrpacked *)&k).f4 | ^~~~~~~~~~~~~~~~~~~~~~~ format.c: In function 'list_arg_types': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { proc.c:1517:17: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 1517 | else if (type==TYCHAR) | ^ format.c:1231:16: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 1231 | if (vclass == CLPROC) | ^ expr.c:1141:65: warning: array subscript has type 'char' [-Wchar-subscripts] 1141 | np->vtype = dflttype[letter(np->fvarname[0])]; | ~~~~~~~~~~~~^~~ defs.h:739:27: note: in definition of macro 'letter' 739 | #define letter(x) Letters[x] | ^ lex.c: In function 'crunch': formatdata.c: In function 'get_fill': lex.c:1196:32: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 1196 | else if(parlev == 0) | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { formatdata.c:984:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 984 | if (L = loc % typesize[xtype]) { | ^ format.c: In function 'write_ioblocks': proc.c: In function 'setintr': expr.c: In function 'stfcall': putpcc.c: In function 'putaddr': format.c:1322:36: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1322 | for(s = L->fields; f = *s; s++) { | ^ expr.c:1231:64: warning: array subscript has type 'char' [-Wchar-subscripts] 1231 | type = np->vtype = dflttype[letter(np->fvarname[0])]; | ~~~~~~~~~~~~^~~ defs.h:739:27: note: in definition of macro 'letter' 739 | #define letter(x) Letters[x] | ^ proc.c:1622:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1622 | if(k = intrfunct(v->fvarname)) { | ^ putpcc.c:1196:12: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 1196 | if (p->isarray && p->memoffset) | ^ formatdata.c: In function 'wr_equiv_init': formatdata.c:1053:41: warning: array subscript has type 'char' [-Wchar-subscripts] 1053 | if (halign && typealign[typepref[xtype]] < typealign[htype]) | ~~~~~~~~^~~~~~~ format.c:1335:23: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1335 | while(L = L->next); | ^ proc.c:1623:23: warning: dereferencing type-punned pointer will break strict-aliasing rules [-Wstrict-aliasing] 1623 | if ((*(struct Intrpacked *)&k).f4) | ^~~~~~~~~~~~~~~~~~~~~~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { output.c: In function 'out_call': format.c: In function 'write_assigned_fmts': lex.c: In function 'analyz': formatdata.c:1072:37: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1072 | if (j = (int)(L % k)) | ^ output.c:1331:25: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 1330 | !ONEOF (q -> addrblock.vstg, M(STGEXT)|M(STGLENG)) | ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 1331 | && (ONEOF(q->addrblock.vstg, | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~ 1332 | M(STGCOMMON)|M(STGEQUIV)|M(STGMEMNO)) | ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 1333 | || ((memoffset = q->addrblock.memoffset) | ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 1334 | && (!ISICON(memoffset) | ~~~~~~~~~~~~~~~~~~~~~~ 1335 | || memoffset->constblock.Const.ci))) | ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ lex.c:1272:19: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 1272 | if(stkey==SGOTO && lastch>=nextch) | ^ format.c:1368:23: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1368 | while(cp = cp->nextp); | ^~ proc.c:1623:20: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 1623 | if ((*(struct Intrpacked *)&k).f4) | ^ format.c: In function 'to_upper': In file included from lex.c:24: lex.c: In function 'getkwd': expr.c: In function 'mkplace': output.c:1310:16: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 1310 | if (q -> headblock.vtype != TYCHAR) | ^ format.c:1383:15: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1383 | while(*t++ = (c = *s++) >= 'a' && c <= 'z' ? c + 'A' - 'a' : c); | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { In function 'write_typedefs', inlined from 'main' at main.c:695:3: put.c:386:41: warning: 'ds[1]' may be used uninitialized [-Wmaybe-uninitialized] 386 | && !strcmp(ds[1], litp->cds[1]))) { | ^~~~~~~~~~~~~~~~~~~~~~~~~~~ sysdep.c: In function 'c_name': putpcc.c: In function 'save_argtypes': expr.c:1355:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 1355 | if(np->vdovar && ( (regn = inregister(np)) >= 0) ) | ^ sysdep.c:260:15: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 260 | while(c = *s++) | ^ put.c:282:41: note: 'ds[1]' was declared here 282 | char cdsbuf0[64], cdsbuf1[64], *ds[2]; | ^~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { output.c: In function 'out_init': io.c: In function 'ioset': niceprintf.c: In function 'adjust_pointer_in_string': lex.c:1292:26: warning: array subscript has type 'char' [-Wchar-subscripts] 1292 | k = letter(nextch[0]); | ~~~~~~^~~ defs.h:739:27: note: in definition of macro 'letter' 739 | #define letter(x) Letters[x] | ^ format.c: In function 'write_namelists': niceprintf.c:191:19: warning: 's0' may be used uninitialized [-Wmaybe-uninitialized] 191 | return s0 - 1; | ~~~^~~ niceprintf.c:172:38: note: 's0' was declared here 172 | register char *s, *s1, *se, *s0; | ^~ put.c:383:37: warning: 'ds[0]' may be used uninitialized [-Wmaybe-uninitialized] 383 | && !strcmp(ds[0], litp->cds[0]) | ^~~~~~~~~~~~~~~~~~~~~~~~~~~ put.c:282:41: note: 'ds[0]' was declared here 282 | char cdsbuf0[64], cdsbuf1[64], *ds[2]; | ^~ putpcc.c:1450:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1450 | if (at = *at0) { | ^~ put.c:429:65: warning: 'cd[1]' may be used uninitialized [-Wmaybe-uninitialized] 429 | litp->litval.litdval[1] = cd[1]; | ~~~~~~~~~~~~~~~~~~~~~~~~^~~~~~~ output.c:1438:16: warning: array subscript has type 'char' [-Wchar-subscripts] 1438 | tr_tab[*s++] = 3; | ^~~~ io.c:1328:46: warning: '__sprintf_chk' may write a terminating nul past the end of the destination [-Wformat-overflow=] 1328 | sprintf(q->user.ident, "%s.%s", | ^ put.c:279:16: note: 'cd[1]' was declared here 279 | double cd[2]; | ^~ lex.c:1293:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1293 | if(pk = keystart[k]) | ^~ format.c:1441:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1441 | if (dimp = v->vdim) { | ^~~~ In file included from /usr/include/stdio.h:964, from sysdep.h:58, from defs.h:24, from io.c:32: In function 'sprintf', inlined from 'ioset' at io.c:1328:3: /usr/include/bits/stdio2.h:30:10: note: '__sprintf_chk' output 2 or more bytes (assuming 33) into a destination of size 32 30 | return __builtin___sprintf_chk (__s, __USE_FORTIFY_LEVEL - 1, | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 31 | __glibc_objsize (__s), __fmt, | ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 32 | __va_arg_pack ()); | ~~~~~~~~~~~~~~~~~ put.c:382:35: warning: 'cd[0]' may be used uninitialized [-Wmaybe-uninitialized] 382 | if(cd[0] == litp->litval.litdval[0] | ^ put.c:279:16: note: 'cd[0]' was declared here 279 | double cd[2]; | ^~ In file included from /usr/include/string.h:548, from sysdep.h:96, from defs.h:24, from put.c:29: In function 'memcpy', inlined from 'putconst' at put.c:422:6: /usr/include/bits/string_fortified.h:29:10: warning: 'strp' may be used uninitialized [-Wmaybe-uninitialized] 29 | return __builtin___memcpy_chk (__dest, __src, __len, | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 30 | __glibc_objsize0 (__dest)); | ~~~~~~~~~~~~~~~~~~~~~~~~~~ put.c: In function 'putconst': put.c:281:15: note: 'strp' was declared here 281 | char *strp; | ^~~~ put.c:420:58: warning: 'nblanks' may be used uninitialized [-Wmaybe-uninitialized] 420 | litp->litval.litival2[1] = nblanks; | ~~~~~~~~~~~~~~~~~~~~~~~~~^~~~~~~~~ put.c:280:16: note: 'nblanks' was declared here 280 | ftnint nblanks; | ^~~~~~~ put.c:374:37: warning: 'len' may be used uninitialized [-Wmaybe-uninitialized] 374 | && !memcmp(strp, litp->cds[0], len)) { | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ put.c:277:16: note: 'len' was declared here 277 | int k, len, type; | ^~~ lex.c: In function 'initkey': expr.c: In function 'mklhs': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { expr.c:1454:33: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 1453 | && (np->vdim->ndim > 1 || np->vtype == TYCHAR | ~~~~~~~~~~~~~~~~~~~ 1454 | && (!ISCONST(np->vleng) | ^~~~~~~~~~~~~~~~~~~~~~~ 1455 | || np->vleng->constblock.Const.ci != 1))) | ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ lex.c:1323:38: warning: array subscript has type 'char' [-Wchar-subscripts] 1323 | j = letter(p->keyname[0]); | ~~~~~~~~~~^~~ defs.h:739:27: note: in definition of macro 'letter' 739 | #define letter(x) Letters[x] | ^ format.c:1485:23: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1485 | while(nmch = nmch->nextp); | ^~~~ io.c: In function 'ioset': io.c:1314:25: warning: 's' may be used uninitialized [-Wmaybe-uninitialized] 1314 | string_num(s, p->constblock.Const.ci); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ main.c:370:41: warning: 'c_output' may be used uninitialized [-Wmaybe-uninitialized] 370 | nice_printf(outfile, | ^~~~~~~~~~~~~~~~~~~~ 371 | "typedef int /* Unknown procedure type */ (*%s)%s;\n", | ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 372 | s, p); | ~~~~~ main.c: In function 'main': lex.c:1340:15: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1340 | while(i = *s++) | ^ main.c:549:15: note: 'c_output' was declared here 549 | FILE *c_output; | ^~~~~~~~ io.c:1302:32: note: 's' was declared here 1302 | register char *s; | ^ lex.c:1343:15: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1343 | while(i = *s++) | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { output.c: In function 'compgoto_out': output.c:1695:33: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 1695 | && index->exprblock.opcode == OPWHATSIN) main.c:720:17: warning: pointer 'c_output_107' used after 'fclose' [-Wuse-after-free] 720 | def_commons(c_output); | ^~~~~~~~~~~~~~~~~~~~~ main.c:719:25: note: call to 'fclose' here 719 | fclose(c_output); | ^~~~~~~~~~~~~~~~ expr.c: In function 'suboffset': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { sysdep.c: In function 'fmt_init': sysdep.c:550:40: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 550 | for(s = "\b\t\n\f\r\v", i = 0; j = *(unsigned char *)s++;) | ^ expr.c:1625:66: warning: array subscript has type 'char' [-Wchar-subscripts] 1625 | (expptr) cpexpr(np->vleng) : ICON(typesize[np->vtype]); | ~~^~~~~~~ defines.h:294:36: note: in definition of macro 'ICON' 294 | #define ICON(z) mkintcon( (ftnint)(z) ) | ^ lex.c: In function 'gettok': lex.c:1503:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 1503 | if(ch == '.') | ^ format.c: In function 'list_decls': putpcc.c: In function 'putcall': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { putpcc.c:1751:25: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 1751 | && q->addrblock.user.name->vprocclass == PTHISPROC) sysdep.c: In function 'dsort': sysdep.c:694:23: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 694 | while(mb = mb1); | ^~ format.c:1676:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1676 | if (this_var = arg->vlastdim) { | ^~~~~~~~ expr.c: In function 'subcheck': expr.c:1672:19: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 1672 | if( ISICON(dimp->nelt) ) | ^ format.c:1688:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1688 | if (Var = (Addrp)this_var->datap) { | ^~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { lex.c:1582:38: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 1582 | if (nextch[1] == '#' && nextch < lastch | ~~~~~~~~~~~~~~~~~^~~~~~~~~~~~~~~~~~ expr.c: In function 'mkaddr': format.c:1700:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1700 | if (this_var = nv[i]) { | ^~~~~~~~ expr.c:1737:65: warning: array subscript has type 'char' [-Wchar-subscripts] 1737 | return (Addrp) cpexpr((expptr)xretslot[p->vtype]); | ~^~~~~~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { format.c:1723:25: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 1721 | || Var->uname_tag == UNAM_IDENT | ~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 1722 | && *Var->user.ident == ' ' | ~~~~~~~~~~~~~~~~~~~~~~~~~~ 1723 | && multitype) | ^~~~~~~~~~~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { putpcc.c: In function 'foldminmax': putpcc.c:1932:26: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1932 | else if (dstg = c1->vstg) | ^~~~ expr.c: In function 'vardcl': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { expr.c:1942:54: warning: array subscript has type 'char' [-Wchar-subscripts] 1942 | v->vstg = implstg[ letter(v->fvarname[0]) ]; | ~~~~~~~~~~~^~~ defs.h:739:27: note: in definition of macro 'letter' 739 | #define letter(x) Letters[x] | ^ putpcc.c:1936:23: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1936 | while(p = p->nextp) { | ^ format.c:1819:16: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 1819 | if (var->vsubscrused) | ^ putpcc.c:1941:34: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1941 | else if (d1stg = c1->vstg) | ^~~~~ expr.c:1957:20: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1957 | if(t = v->vdim) | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { io.c: In function 'ioseta': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { expr.c:1957:19: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 1957 | if(t = v->vdim) | ^ proc.c: In function 'autovar': io.c:1447:34: warning: 's' may be used uninitialized [-Wmaybe-uninitialized] 1447 | s1 = mem(strlen(s)+10,0); | ^~~~~~~~~ expr.c: In function 'impldcl': proc.c:1253:28: warning: 'leng' may be used uninitialized [-Wmaybe-uninitialized] 1253 | q->varleng = leng; | ~~~~~~~~~~~^~~~~~ expr.c:1990:39: warning: array subscript has type 'char' [-Wchar-subscripts] 1990 | k = letter(p->fvarname[0]); | ~~~~~~~~~~~^~~ defs.h:739:27: note: in definition of macro 'letter' 739 | #define letter(x) Letters[x] | ^ io.c:1387:15: note: 's' was declared here 1387 | char *s, *s1; | ^ proc.c:1233:16: note: 'leng' was declared here 1233 | ftnint leng; | ^~~~ putpcc.c:1956:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1956 | if (c->vstg = dstg) | ^ format.c:1890:17: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1890 | if (Define = (Alias && def_equivs)) { | ^~~~~~ expr.c: In function 'inferdcl': expr.c:2015:45: warning: array subscript has type 'char' [-Wchar-subscripts] 2015 | int k = impltype[letter(np->fvarname[0])]; | ~~~~~~~~~~~~^~~ defs.h:739:27: note: in definition of macro 'letter' 739 | #define letter(x) Letters[x] | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { putpcc.c:1963:23: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 1963 | while(p = p->nextp) { | ^ format.c:1956:21: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 1955 | if (type == TYCHAR && vclass != CLPROC | ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 1956 | && (!var->vleng || !ISICON (var -> vleng)) | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ expr.c: In function 'mkexpr': expr.c:2198:60: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 2198 | if (opcode == OPSTAR || ISICON(rp) && intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { format.c:2103:60: warning: array subscript has type 'char' [-Wchar-subscripts] 2103 | var->cvarname, typeconv[var->vtype], | ~~~^~~~~~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { expr.c: In function 'cktype': expr.c:2514:58: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 2514 | && (lt == TYCHAR && ISNUMERIC(rt) format.c: In function 'proto': format.c:2493:46: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 2493 | || j == 200 && k >= 200) | ~~~~~~~~~^~~~~~~~~~~ expr.c:2551:35: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 2551 | if (ISLOGICAL(lt) && ISLOGICAL(rt) format.c:2501:39: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 2501 | while(cp = cp->nextp); | ^~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { expr.c: In function 'fold': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { expr.c:2908:49: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 2908 | || rp->constblock.Const.ci < 0 && zeroconst(lp)) | ~~~~~~~~~~~~~~~~~~~~~~~~~~~~^~~~~~~~~~~~~~~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { output.c: In function 'out_call': putpcc.c: In function 'get_argtypes.isra.0': putpcc.c:1647:16: warning: 'fname' may be used uninitialized [-Wmaybe-uninitialized] 1647 | return fname; | ^~~~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { output.c:1303:33: warning: 'at' may be used uninitialized [-Wmaybe-uninitialized] 1303 | else if (Ac && narg < at->dnargs | ~~^~~~~~~~ output.c:1149:15: note: 'at' was declared here 1149 | Argtypes *at; | ^~ putpcc.c:1613:15: note: 'fname' was declared here 1613 | char *fname; | ^~~~~ putpcc.c:1646:15: warning: 'at1' may be used uninitialized [-Wmaybe-uninitialized] 1646 | *pat1 = at1; | ~~~~~~^~~~~ putpcc.c:1610:27: note: 'at1' was declared here 1610 | Argtypes **at0, **at1; | ^~~ putpcc.c:1645:15: warning: 'at0' may be used uninitialized [-Wmaybe-uninitialized] 1645 | *pat0 = at0; | ~~~~~~^~~~~ putpcc.c:1610:20: note: 'at0' was declared here 1610 | Argtypes **at0, **at1; | ^~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { proc.c: In function 'mktmpn': proc.c:1315:35: warning: 'leng' may be used uninitialized [-Wmaybe-uninitialized] 1315 | (type!=TYCHAR || q->vleng->constblock.Const.ci==leng) ) | ~~~~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ proc.c:1286:16: note: 'leng' was declared here 1286 | ftnint leng; | ^~~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { io.c: In function 'startrw': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { io.c:1094:20: warning: 'recp' may be used uninitialized [-Wmaybe-uninitialized] 1094 | if (recp) { | ^ io.c:942:37: note: 'recp' was declared here 942 | register Addrp unitp, fmtp, recp; | ^~~~ io.c:1151:17: warning: 'nump' may be used uninitialized [-Wmaybe-uninitialized] 1151 | ioset(TYIOINT, XIRNUM, nump); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~ io.c:943:25: note: 'nump' was declared here 943 | register expptr nump; | ^~~~ io.c:1152:17: warning: 'unitp' may be used uninitialized [-Wmaybe-uninitialized] 1152 | ioset(TYIOINT, XIRLEN, cpexpr(unitp->vleng) ); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ io.c:942:24: note: 'unitp' was declared here 942 | register Addrp unitp, fmtp, recp; | ^~~~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { expr.c: In function 'consbinop': } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { expr.c:3507:37: warning: 'k' may be used uninitialized [-Wmaybe-uninitialized] 3507 | cp->ci = (k <= 0); | ~~~^~~~~ expr.c:3242:16: note: 'k' was declared here 3242 | ftnint k; | ^ expr.c:3243:23: warning: 'bd[1]' may be used uninitialized [-Wmaybe-uninitialized] 3243 | double ad[2], bd[2], temp; | ^~ expr.c:3243:23: warning: 'bd[0]' may be used uninitialized [-Wmaybe-uninitialized] intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { expr.c:3243:16: warning: 'ad[1]' may be used uninitialized [-Wmaybe-uninitialized] 3243 | double ad[2], bd[2], temp; | ^~ expr.c:3243:16: warning: 'ad[0]' may be used uninitialized [-Wmaybe-uninitialized] intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { format.c: In function 'do_uninit_equivs': intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { format.c:2137:47: warning: 'k' may be used uninitialized [-Wmaybe-uninitialized] 2137 | (eqv->eqvtop - eqv->eqvbottom + k - 1) / k); | ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^~~ format.c:2120:9: note: 'k' was declared here 2120 | int k, last_type = -1, t; | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amaxIn file included from defs.h:27, from putpcc.c:27: defines.h: In function 'putcx1': defines.h:277:20: warning: 'rtype' may be used uninitialized [-Wmaybe-uninitialized] 277 | #define ONEOF(x,y) (M(x) & (y)) | ^ 1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { putpcc.c:668:20: note: 'rtype' was declared here 668 | int ltype, rtype; | ^~~~~ defines.h:277:20: warning: 'ltype' may be used uninitialized [-Wmaybe-uninitialized] 277 | #define ONEOF(x,y) (M(x) & (y)) | ^ putpcc.c:668:13: note: 'ltype' was declared here 668 | int ltype, rtype; | ^~~~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { putpcc.c: In function 'putch1.part.0': lex.c: In function 'yylex': } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { lex.c:571:12: warning: 'retval' may be used uninitialized [-Wmaybe-uninitialized] 571 | if (retval == SEOF) | ^ putpcc.c:970:23: warning: 't' may be used uninitialized [-Wmaybe-uninitialized] 970 | return(t); | ^ lex.c:510:13: note: 'retval' was declared here 510 | int retval; | ^~~~~~ putpcc.c:923:15: note: 't' declared here 923 | Addrp t; | ^ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { putpcc.c: In function 'putx': } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { } 206 | "fpscal", { INTRGEN, 2, 93 }, | { expr.c: In function 'cktype': putpcc.c:528:16: warning: 'k' may be used uninitialized [-Wmaybe-uninitialized] 528 | ftnint k; | ^ expr.c:2623:9: warning: 'errs' may be used uninitialized [-Wmaybe-uninitialized] 2623 | err(errs); | ^~~~~~~~~ expr.c:2459:15: note: 'errs' was declared here 2459 | char *errs; | ^~~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { } 206 | "fpscal", { INTRGEN, 2, 93 }, | { } 207 | 208 | "cdabs", { INTRSPEC, TYDREAL, 13, 1, 0, 1 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { } 206 | "fpscal", { INTRGEN, 2, 93 }, | { } 207 | 208 | "cdabs", { INTRSPEC, TYDREAL, 13, 1, 0, 1 }, | { } 209 | "cdsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1, 0, 1 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { } 206 | "fpscal", { INTRGEN, 2, 93 }, | { } 207 | 208 | "cdabs", { INTRSPEC, TYDREAL, 13, 1, 0, 1 }, | { } 209 | "cdsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1, 0, 1 }, | { } 210 | "cdexp", { INTRSPEC, TYDCOMPLEX, 42, 1, 0, 1 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { } 206 | "fpscal", { INTRGEN, 2, 93 }, | { } 207 | 208 | "cdabs", { INTRSPEC, TYDREAL, 13, 1, 0, 1 }, | { } 209 | "cdsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1, 0, 1 }, | { } 210 | "cdexp", { INTRSPEC, TYDCOMPLEX, 42, 1, 0, 1 }, | { } 211 | "cdlog", { INTRSPEC, TYDCOMPLEX, 46, 1, 0, 1 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { } 206 | "fpscal", { INTRGEN, 2, 93 }, | { } 207 | 208 | "cdabs", { INTRSPEC, TYDREAL, 13, 1, 0, 1 }, | { } 209 | "cdsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1, 0, 1 }, | { } 210 | "cdexp", { INTRSPEC, TYDCOMPLEX, 42, 1, 0, 1 }, | { } 211 | "cdlog", { INTRSPEC, TYDCOMPLEX, 46, 1, 0, 1 }, | { } 212 | "cdsin", { INTRSPEC, TYDCOMPLEX, 52, 1, 0, 1 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { } 206 | "fpscal", { INTRGEN, 2, 93 }, | { } 207 | 208 | "cdabs", { INTRSPEC, TYDREAL, 13, 1, 0, 1 }, | { } 209 | "cdsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1, 0, 1 }, | { } 210 | "cdexp", { INTRSPEC, TYDCOMPLEX, 42, 1, 0, 1 }, | { } 211 | "cdlog", { INTRSPEC, TYDCOMPLEX, 46, 1, 0, 1 }, | { } 212 | "cdsin", { INTRSPEC, TYDCOMPLEX, 52, 1, 0, 1 }, | { } 213 | "cdcos", { INTRSPEC, TYDCOMPLEX, 56, 1, 0, 1 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { } 206 | "fpscal", { INTRGEN, 2, 93 }, | { } 207 | 208 | "cdabs", { INTRSPEC, TYDREAL, 13, 1, 0, 1 }, | { } 209 | "cdsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1, 0, 1 }, | { } 210 | "cdexp", { INTRSPEC, TYDCOMPLEX, 42, 1, 0, 1 }, | { } 211 | "cdlog", { INTRSPEC, TYDCOMPLEX, 46, 1, 0, 1 }, | { } 212 | "cdsin", { INTRSPEC, TYDCOMPLEX, 52, 1, 0, 1 }, | { } 213 | "cdcos", { INTRSPEC, TYDCOMPLEX, 56, 1, 0, 1 }, | { } 214 | 215 | "iand", { INTRBOOL, TYUNKNOWN, OPBITAND, 0, 0, 2 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { } 206 | "fpscal", { INTRGEN, 2, 93 }, | { } 207 | 208 | "cdabs", { INTRSPEC, TYDREAL, 13, 1, 0, 1 }, | { } 209 | "cdsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1, 0, 1 }, | { } 210 | "cdexp", { INTRSPEC, TYDCOMPLEX, 42, 1, 0, 1 }, | { } 211 | "cdlog", { INTRSPEC, TYDCOMPLEX, 46, 1, 0, 1 }, | { } 212 | "cdsin", { INTRSPEC, TYDCOMPLEX, 52, 1, 0, 1 }, | { } 213 | "cdcos", { INTRSPEC, TYDCOMPLEX, 56, 1, 0, 1 }, | { } 214 | 215 | "iand", { INTRBOOL, TYUNKNOWN, OPBITAND, 0, 0, 2 }, | { } 216 | "ior", { INTRBOOL, TYUNKNOWN, OPBITOR, 0, 0, 2 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { } 206 | "fpscal", { INTRGEN, 2, 93 }, | { } 207 | 208 | "cdabs", { INTRSPEC, TYDREAL, 13, 1, 0, 1 }, | { } 209 | "cdsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1, 0, 1 }, | { } 210 | "cdexp", { INTRSPEC, TYDCOMPLEX, 42, 1, 0, 1 }, | { } 211 | "cdlog", { INTRSPEC, TYDCOMPLEX, 46, 1, 0, 1 }, | { } 212 | "cdsin", { INTRSPEC, TYDCOMPLEX, 52, 1, 0, 1 }, | { } 213 | "cdcos", { INTRSPEC, TYDCOMPLEX, 56, 1, 0, 1 }, | { } 214 | 215 | "iand", { INTRBOOL, TYUNKNOWN, OPBITAND, 0, 0, 2 }, | { } 216 | "ior", { INTRBOOL, TYUNKNOWN, OPBITOR, 0, 0, 2 }, | { } 217 | "ieor", { INTRBOOL, TYUNKNOWN, OPBITXOR, 0, 0, 2 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { } 206 | "fpscal", { INTRGEN, 2, 93 }, | { } 207 | 208 | "cdabs", { INTRSPEC, TYDREAL, 13, 1, 0, 1 }, | { } 209 | "cdsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1, 0, 1 }, | { } 210 | "cdexp", { INTRSPEC, TYDCOMPLEX, 42, 1, 0, 1 }, | { } 211 | "cdlog", { INTRSPEC, TYDCOMPLEX, 46, 1, 0, 1 }, | { } 212 | "cdsin", { INTRSPEC, TYDCOMPLEX, 52, 1, 0, 1 }, | { } 213 | "cdcos", { INTRSPEC, TYDCOMPLEX, 56, 1, 0, 1 }, | { } 214 | 215 | "iand", { INTRBOOL, TYUNKNOWN, OPBITAND, 0, 0, 2 }, | { } 216 | "ior", { INTRBOOL, TYUNKNOWN, OPBITOR, 0, 0, 2 }, | { } 217 | "ieor", { INTRBOOL, TYUNKNOWN, OPBITXOR, 0, 0, 2 }, | { } 218 | 219 | "btest", { INTRBGEN, TYLOGICAL, OPBITTEST,0, 0, 2 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { format.c: In function 'do_format': } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { } 206 | "fpscal", { INTRGEN, 2, 93 }, | { } 207 | 208 | "cdabs", { INTRSPEC, TYDREAL, 13, 1, 0, 1 }, | { } 209 | "cdsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1, 0, 1 }, | { } 210 | "cdexp", { INTRSPEC, TYDCOMPLEX, 42, 1, 0, 1 }, | { } 211 | "cdlog", { INTRSPEC, TYDCOMPLEX, 46, 1, 0, 1 }, | { } 212 | "cdsin", { INTRSPEC, TYDCOMPLEX, 52, 1, 0, 1 }, | { } 213 | "cdcos", { INTRSPEC, TYDCOMPLEX, 56, 1, 0, 1 }, | { } 214 | 215 | "iand", { INTRBOOL, TYUNKNOWN, OPBITAND, 0, 0, 2 }, | { } 216 | "ior", { INTRBOOL, TYUNKNOWN, OPBITOR, 0, 0, 2 }, | { } 217 | "ieor", { INTRBOOL, TYUNKNOWN, OPBITXOR, 0, 0, 2 }, | { } 218 | 219 | "btest", { INTRBGEN, TYLOGICAL, OPBITTEST,0, 0, 2 }, | { } 220 | "ibclr", { INTRBGEN, TYUNKNOWN, OPBITCLR, 0, 0, 2 }, | { format.c:320:12: warning: 'retval' may be used uninitialized [-Wmaybe-uninitialized] 320 | return retval; | ^~~~~~ format.c:199:12: note: 'retval' was declared here 199 | expptr retval = ENULL; | ^~~~~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { } 206 | "fpscal", { INTRGEN, 2, 93 }, | { } 207 | 208 | "cdabs", { INTRSPEC, TYDREAL, 13, 1, 0, 1 }, | { } 209 | "cdsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1, 0, 1 }, | { } 210 | "cdexp", { INTRSPEC, TYDCOMPLEX, 42, 1, 0, 1 }, | { } 211 | "cdlog", { INTRSPEC, TYDCOMPLEX, 46, 1, 0, 1 }, | { } 212 | "cdsin", { INTRSPEC, TYDCOMPLEX, 52, 1, 0, 1 }, | { } 213 | "cdcos", { INTRSPEC, TYDCOMPLEX, 56, 1, 0, 1 }, | { } 214 | 215 | "iand", { INTRBOOL, TYUNKNOWN, OPBITAND, 0, 0, 2 }, | { } 216 | "ior", { INTRBOOL, TYUNKNOWN, OPBITOR, 0, 0, 2 }, | { } 217 | "ieor", { INTRBOOL, TYUNKNOWN, OPBITXOR, 0, 0, 2 }, | { } 218 | 219 | "btest", { INTRBGEN, TYLOGICAL, OPBITTEST,0, 0, 2 }, | { } 220 | "ibclr", { INTRBGEN, TYUNKNOWN, OPBITCLR, 0, 0, 2 }, | { } 221 | "ibset", { INTRBGEN, TYUNKNOWN, OPBITSET, 0, 0, 2 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { } 206 | "fpscal", { INTRGEN, 2, 93 }, | { } 207 | 208 | "cdabs", { INTRSPEC, TYDREAL, 13, 1, 0, 1 }, | { } 209 | "cdsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1, 0, 1 }, | { } 210 | "cdexp", { INTRSPEC, TYDCOMPLEX, 42, 1, 0, 1 }, | { } 211 | "cdlog", { INTRSPEC, TYDCOMPLEX, 46, 1, 0, 1 }, | { } 212 | "cdsin", { INTRSPEC, TYDCOMPLEX, 52, 1, 0, 1 }, | { } 213 | "cdcos", { INTRSPEC, TYDCOMPLEX, 56, 1, 0, 1 }, | { } 214 | 215 | "iand", { INTRBOOL, TYUNKNOWN, OPBITAND, 0, 0, 2 }, | { } 216 | "ior", { INTRBOOL, TYUNKNOWN, OPBITOR, 0, 0, 2 }, | { } 217 | "ieor", { INTRBOOL, TYUNKNOWN, OPBITXOR, 0, 0, 2 }, | { } 218 | 219 | "btest", { INTRBGEN, TYLOGICAL, OPBITTEST,0, 0, 2 }, | { } 220 | "ibclr", { INTRBGEN, TYUNKNOWN, OPBITCLR, 0, 0, 2 }, | { } 221 | "ibset", { INTRBGEN, TYUNKNOWN, OPBITSET, 0, 0, 2 }, | { } 222 | "ibits", { INTRBGEN, TYUNKNOWN, OPBITBITS,0, 0, 2 }, | { expr.c: In function 'mkexpr': expr.c:2422:42: warning: 'rtag' may be used uninitialized [-Wmaybe-uninitialized] 2422 | if(ltag==TCONST && (rp==0 || rtag==TCONST) ) expr.c:2100:19: note: 'rtag' was declared here 2100 | int ltag, rtag; | ^~~~ intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { } 206 | "fpscal", { INTRGEN, 2, 93 }, | { } 207 | 208 | "cdabs", { INTRSPEC, TYDREAL, 13, 1, 0, 1 }, | { } 209 | "cdsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1, 0, 1 }, | { } 210 | "cdexp", { INTRSPEC, TYDCOMPLEX, 42, 1, 0, 1 }, | { } 211 | "cdlog", { INTRSPEC, TYDCOMPLEX, 46, 1, 0, 1 }, | { } 212 | "cdsin", { INTRSPEC, TYDCOMPLEX, 52, 1, 0, 1 }, | { } 213 | "cdcos", { INTRSPEC, TYDCOMPLEX, 56, 1, 0, 1 }, | { } 214 | 215 | "iand", { INTRBOOL, TYUNKNOWN, OPBITAND, 0, 0, 2 }, | { } 216 | "ior", { INTRBOOL, TYUNKNOWN, OPBITOR, 0, 0, 2 }, | { } 217 | "ieor", { INTRBOOL, TYUNKNOWN, OPBITXOR, 0, 0, 2 }, | { } 218 | 219 | "btest", { INTRBGEN, TYLOGICAL, OPBITTEST,0, 0, 2 }, | { } 220 | "ibclr", { INTRBGEN, TYUNKNOWN, OPBITCLR, 0, 0, 2 }, | { } 221 | "ibset", { INTRBGEN, TYUNKNOWN, OPBITSET, 0, 0, 2 }, | { } 222 | "ibits", { INTRBGEN, TYUNKNOWN, OPBITBITS,0, 0, 2 }, | { } 223 | "ishft", { INTRBGEN, TYUNKNOWN, OPBITSH, 0, 0, 2 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { } 206 | "fpscal", { INTRGEN, 2, 93 }, | { } 207 | 208 | "cdabs", { INTRSPEC, TYDREAL, 13, 1, 0, 1 }, | { } 209 | "cdsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1, 0, 1 }, | { } 210 | "cdexp", { INTRSPEC, TYDCOMPLEX, 42, 1, 0, 1 }, | { } 211 | "cdlog", { INTRSPEC, TYDCOMPLEX, 46, 1, 0, 1 }, | { } 212 | "cdsin", { INTRSPEC, TYDCOMPLEX, 52, 1, 0, 1 }, | { } 213 | "cdcos", { INTRSPEC, TYDCOMPLEX, 56, 1, 0, 1 }, | { } 214 | 215 | "iand", { INTRBOOL, TYUNKNOWN, OPBITAND, 0, 0, 2 }, | { } 216 | "ior", { INTRBOOL, TYUNKNOWN, OPBITOR, 0, 0, 2 }, | { } 217 | "ieor", { INTRBOOL, TYUNKNOWN, OPBITXOR, 0, 0, 2 }, | { } 218 | 219 | "btest", { INTRBGEN, TYLOGICAL, OPBITTEST,0, 0, 2 }, | { } 220 | "ibclr", { INTRBGEN, TYUNKNOWN, OPBITCLR, 0, 0, 2 }, | { } 221 | "ibset", { INTRBGEN, TYUNKNOWN, OPBITSET, 0, 0, 2 }, | { } 222 | "ibits", { INTRBGEN, TYUNKNOWN, OPBITBITS,0, 0, 2 }, | { } 223 | "ishft", { INTRBGEN, TYUNKNOWN, OPBITSH, 0, 0, 2 }, | { } 224 | "ishftc", { INTRBGEN, TYUNKNOWN, OPBITSHC, 0, 0, 2 }, | { intr.c:50:1: warning: missing braces around initializer [-Wmissing-braces] 50 | { | ^ 51 | "int", { INTRCONV, TYLONG }, | { } 52 | "real", { INTRCONV, TYREAL, 1 }, | { } 53 | /* 1 ==> real(TYDCOMPLEX) yields TYDREAL */ 54 | "dble", { INTRCONV, TYDREAL }, | { } 55 | "dreal", { INTRCONV, TYDREAL, 0, 0, 0, 1 }, | { } 56 | "cmplx", { INTRCONV, TYCOMPLEX }, | { } 57 | "dcmplx", { INTRCONV, TYDCOMPLEX, 0, 1 }, | { } 58 | "ifix", { INTRCONV, TYLONG }, | { } 59 | "idint", { INTRCONV, TYLONG }, | { } 60 | "float", { INTRCONV, TYREAL }, | { } 61 | "dfloat", { INTRCONV, TYDREAL }, | { } 62 | "sngl", { INTRCONV, TYREAL }, | { } 63 | "ichar", { INTRCONV, TYLONG }, | { } 64 | "iachar", { INTRCONV, TYLONG }, | { } 65 | "char", { INTRCONV, TYCHAR }, | { } 66 | "achar", { INTRCONV, TYCHAR }, | { } ...... 72 | "max", { INTRMAX, TYUNKNOWN }, | { } 73 | "max0", { INTRMAX, TYLONG }, | { } 74 | "amax0", { INTRMAX, TYREAL }, | { } 75 | "max1", { INTRMAX, TYLONG }, | { } 76 | "amax1", { INTRMAX, TYREAL }, | { } 77 | "dmax1", { INTRMAX, TYDREAL }, | { } 78 | 79 | "and", { INTRBOOL, TYUNKNOWN, OPBITAND }, | { } 80 | "or", { INTRBOOL, TYUNKNOWN, OPBITOR }, | { } 81 | "xor", { INTRBOOL, TYUNKNOWN, OPBITXOR }, | { } 82 | "not", { INTRBOOL, TYUNKNOWN, OPBITNOT }, | { } 83 | "lshift", { INTRBOOL, TYUNKNOWN, OPLSHIFT }, | { } 84 | "rshift", { INTRBOOL, TYUNKNOWN, OPRSHIFT }, | { } 85 | 86 | "min", { INTRMIN, TYUNKNOWN }, | { } 87 | "min0", { INTRMIN, TYLONG }, | { } 88 | "amin0", { INTRMIN, TYREAL }, | { } 89 | "min1", { INTRMIN, TYLONG }, | { } 90 | "amin1", { INTRMIN, TYREAL }, | { } 91 | "dmin1", { INTRMIN, TYDREAL }, | { } 92 | 93 | "aint", { INTRGEN, 2, 0 }, | { } 94 | "dint", { INTRSPEC, TYDREAL, 1 }, | { } 95 | 96 | "anint", { INTRGEN, 2, 2 }, | { } 97 | "dnint", { INTRSPEC, TYDREAL, 3 }, | { } 98 | 99 | "nint", { INTRGEN, 4, 4 }, | { } 100 | "idnint", { INTRGEN, 2, 6 }, | { } 101 | 102 | "abs", { INTRGEN, 6, 8 }, | { } 103 | "iabs", { INTRGEN, 2, 9 }, | { } 104 | "dabs", { INTRSPEC, TYDREAL, 11 }, | { } 105 | "cabs", { INTRSPEC, TYREAL, 12, 0, 13 }, | { } 106 | "zabs", { INTRSPEC, TYDREAL, 13, 1 }, | { } 107 | 108 | "mod", { INTRGEN, 4, 14 }, | { } 109 | "amod", { INTRSPEC, TYREAL, 16, 0, 17 }, | { } 110 | "dmod", { INTRSPEC, TYDREAL, 17 }, | { } 111 | 112 | "sign", { INTRGEN, 4, 18 }, | { } 113 | "isign", { INTRGEN, 2, 19 }, | { } 114 | "dsign", { INTRSPEC, TYDREAL, 21 }, | { } 115 | 116 | "dim", { INTRGEN, 4, 22 }, | { } 117 | "idim", { INTRGEN, 2, 23 }, | { } 118 | "ddim", { INTRSPEC, TYDREAL, 25 }, | { } 119 | 120 | "dprod", { INTRSPEC, TYDREAL, 26 }, | { } 121 | 122 | "len", { INTRSPEC, TYLONG, 27 }, | { } 123 | "index", { INTRSPEC, TYLONG, 29 }, | { } 124 | 125 | "imag", { INTRGEN, 2, 31 }, | { } 126 | "aimag", { INTRSPEC, TYREAL, 31, 0, 32 }, | { } 127 | "dimag", { INTRSPEC, TYDREAL, 32 }, | { } 128 | 129 | "conjg", { INTRGEN, 2, 33 }, | { } 130 | "dconjg", { INTRSPEC, TYDCOMPLEX, 34, 1 }, | { } 131 | 132 | "sqrt", { INTRGEN, 4, 35 }, | { } 133 | "dsqrt", { INTRSPEC, TYDREAL, 36 }, | { } 134 | "csqrt", { INTRSPEC, TYCOMPLEX, 37, 0, 38 }, | { } 135 | "zsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1 }, | { } 136 | 137 | "exp", { INTRGEN, 4, 39 }, | { } 138 | "dexp", { INTRSPEC, TYDREAL, 40 }, | { } 139 | "cexp", { INTRSPEC, TYCOMPLEX, 41, 0, 42 }, | { } 140 | "zexp", { INTRSPEC, TYDCOMPLEX, 42, 1 }, | { } 141 | 142 | "log", { INTRGEN, 4, 43 }, | { } 143 | "alog", { INTRSPEC, TYREAL, 43, 0, 44 }, | { } 144 | "dlog", { INTRSPEC, TYDREAL, 44 }, | { } 145 | "clog", { INTRSPEC, TYCOMPLEX, 45, 0, 46 }, | { } 146 | "zlog", { INTRSPEC, TYDCOMPLEX, 46, 1 }, | { } 147 | 148 | "log10", { INTRGEN, 2, 47 }, | { } 149 | "alog10", { INTRSPEC, TYREAL, 47, 0, 48 }, | { } 150 | "dlog10", { INTRSPEC, TYDREAL, 48 }, | { } 151 | 152 | "sin", { INTRGEN, 4, 49 }, | { } 153 | "dsin", { INTRSPEC, TYDREAL, 50 }, | { } 154 | "csin", { INTRSPEC, TYCOMPLEX, 51, 0, 52 }, | { } 155 | "zsin", { INTRSPEC, TYDCOMPLEX, 52, 1 }, | { } 156 | 157 | "cos", { INTRGEN, 4, 53 }, | { } 158 | "dcos", { INTRSPEC, TYDREAL, 54 }, | { } 159 | "ccos", { INTRSPEC, TYCOMPLEX, 55, 0, 56 }, | { } 160 | "zcos", { INTRSPEC, TYDCOMPLEX, 56, 1 }, | { } 161 | 162 | "tan", { INTRGEN, 2, 57 }, | { } 163 | "dtan", { INTRSPEC, TYDREAL, 58 }, | { } 164 | 165 | "asin", { INTRGEN, 2, 59 }, | { } 166 | "dasin", { INTRSPEC, TYDREAL, 60 }, | { } 167 | 168 | "acos", { INTRGEN, 2, 61 }, | { } 169 | "dacos", { INTRSPEC, TYDREAL, 62 }, | { } 170 | 171 | "atan", { INTRGEN, 2, 63 }, | { } 172 | "datan", { INTRSPEC, TYDREAL, 64 }, | { } 173 | 174 | "atan2", { INTRGEN, 2, 65 }, | { } 175 | "datan2", { INTRSPEC, TYDREAL, 66 }, | { } 176 | 177 | "sinh", { INTRGEN, 2, 67 }, | { } 178 | "dsinh", { INTRSPEC, TYDREAL, 68 }, | { } 179 | 180 | "cosh", { INTRGEN, 2, 69 }, | { } 181 | "dcosh", { INTRSPEC, TYDREAL, 70 }, | { } 182 | 183 | "tanh", { INTRGEN, 2, 71 }, | { } 184 | "dtanh", { INTRSPEC, TYDREAL, 72 }, | { } 185 | 186 | "lge", { INTRSPEC, TYLOGICAL, 73}, | { } 187 | "lgt", { INTRSPEC, TYLOGICAL, 75}, | { } 188 | "lle", { INTRSPEC, TYLOGICAL, 77}, | { } 189 | "llt", { INTRSPEC, TYLOGICAL, 79}, | { } ...... 201 | "fpexpn", { INTRGEN, 4, 81 }, | { } 202 | "fpabsp", { INTRGEN, 2, 85 }, | { } 203 | "fprrsp", { INTRGEN, 2, 87 }, | { } 204 | "fpfrac", { INTRGEN, 2, 89 }, | { } 205 | "fpmake", { INTRGEN, 2, 91 }, | { } 206 | "fpscal", { INTRGEN, 2, 93 }, | { } 207 | 208 | "cdabs", { INTRSPEC, TYDREAL, 13, 1, 0, 1 }, | { } 209 | "cdsqrt", { INTRSPEC, TYDCOMPLEX, 38, 1, 0, 1 }, | { } 210 | "cdexp", { INTRSPEC, TYDCOMPLEX, 42, 1, 0, 1 }, | { } 211 | "cdlog", { INTRSPEC, TYDCOMPLEX, 46, 1, 0, 1 }, | { } 212 | "cdsin", { INTRSPEC, TYDCOMPLEX, 52, 1, 0, 1 }, | { } 213 | "cdcos", { INTRSPEC, TYDCOMPLEX, 56, 1, 0, 1 }, | { } 214 | 215 | "iand", { INTRBOOL, TYUNKNOWN, OPBITAND, 0, 0, 2 }, | { } 216 | "ior", { INTRBOOL, TYUNKNOWN, OPBITOR, 0, 0, 2 }, | { } 217 | "ieor", { INTRBOOL, TYUNKNOWN, OPBITXOR, 0, 0, 2 }, | { } 218 | 219 | "btest", { INTRBGEN, TYLOGICAL, OPBITTEST,0, 0, 2 }, | { } 220 | "ibclr", { INTRBGEN, TYUNKNOWN, OPBITCLR, 0, 0, 2 }, | { } 221 | "ibset", { INTRBGEN, TYUNKNOWN, OPBITSET, 0, 0, 2 }, | { } 222 | "ibits", { INTRBGEN, TYUNKNOWN, OPBITBITS,0, 0, 2 }, | { } 223 | "ishft", { INTRBGEN, TYUNKNOWN, OPBITSH, 0, 0, 2 }, | { } 224 | "ishftc", { INTRBGEN, TYUNKNOWN, OPBITSHC, 0, 0, 2 }, | { } 225 | 226 | "" }; | { } intr.c: In function 'foldminmax': intr.c:520:23: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 520 | while(cp = cp->nextp) { | ^~ intr.c:542:31: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 542 | while(cp = cp->nextp) { | ^~ intr.c:550:31: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 550 | while(cp = cp->nextp) { | ^~ intr.c:567:23: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 567 | while(cp = cp->nextp) { | ^~ intr.c: In function 'intrcall': intr.c:829:19: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 829 | if(no66flag) | ^ intr.c:869:20: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 869 | if(q = Inline((int)(sp-spectab), mtype, argsp->listp)) | ^ intr.c:879:47: warning: array subscript has type 'char' [-Wchar-subscripts] 879 | callbyvalue[sp->othername], 1); | ~~^~~~~~~~~~~ intr.c: In function 'intrfunct': intr.c:944:29: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 944 | if (i = p->intrval.extflag) { | ^ intr.c: In function 'cast_args': intr.c:1025:12: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 1025 | if (e -> headblock.vtype != maxtype) | ^ expr.c: In function 'mkfunct': expr.c:1184:15: warning: 'q' may be used uninitialized [-Wmaybe-uninitialized] 1184 | return(q); | ^ expr.c:1060:16: note: 'q' was declared here 1060 | expptr q; | ^ cc -Wl,-z,relro -Wl,--as-needed -Wl,-z,now -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-ld -Wl,--build-id=sha1 main.o init.o gram.o lex.o proc.o equiv.o data.o format.o expr.o exec.o intr.o io.o misc.o error.o mem.o names.o output.o p1output.o pread.o put.o putpcc.o vax.o formatdata.o parse_args.o niceprintf.o cds.o sysdep.o version.o -o f2c make: Leaving directory '/builddir/build/BUILD/f2c-20210928/src' + make -C libf2c -f makefile.u -j32 'CFLAGS=-O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC' make: Entering directory '/builddir/build/BUILD/f2c-20210928/libf2c' cp f2c.h0 f2c.h cp signal1.h0 signal1.h cp sysdep1.h0 sysdep1.h cc -c f77vers.c cc -c i77vers.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o main.o main.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o s_rnge.o s_rnge.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o abort_.o abort_.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o exit_.o exit_.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o getarg_.o getarg_.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o iargc_.o iargc_.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o getenv_.o getenv_.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o signal_.o signal_.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o s_stop.o s_stop.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o s_paus.o s_paus.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o system_.o system_.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o cabs.o cabs.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o ctype.o ctype.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o derf_.o derf_.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o derfc_.o derfc_.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o erf_.o erf_.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o erfc_.o erfc_.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o sig_die.o sig_die.c cc -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -DNO_FPINIT arithchk.c -lm ||\ cc -DNO_LONG_LONG -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -DNO_FPINIT arithchk.c -lm cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o pow_ci.o pow_ci.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o pow_dd.o pow_dd.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o pow_di.o pow_di.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o pow_hh.o pow_hh.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o pow_ii.o pow_ii.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o pow_ri.o pow_ri.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o pow_zi.o pow_zi.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o pow_zz.o pow_zz.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o c_abs.o c_abs.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o c_cos.o c_cos.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o c_div.o c_div.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o c_exp.o c_exp.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o c_log.o c_log.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o c_sin.o c_sin.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o c_sqrt.o c_sqrt.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o z_abs.o z_abs.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o z_cos.o z_cos.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o z_div.o z_div.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o z_exp.o z_exp.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o z_log.o z_log.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o z_sin.o z_sin.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o z_sqrt.o z_sqrt.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_abs.o r_abs.c arithchk.c: In function 'ccheck': arithchk.c:127:24: warning: zero-length gnu_printf format string [-Wformat-zero-length] 127 | Cray1 = printf(emptyfmt) < 0 ? 0 : 4617762; | ^~~~~~~~ cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_acos.o r_acos.c arithchk.c:128:20: warning: zero-length gnu_printf format string [-Wformat-zero-length] 128 | if (printf(emptyfmt, Cray1) >= 0) | ^~~~~~~~ arithchk.c:130:20: warning: zero-length gnu_printf format string [-Wformat-zero-length] 130 | if (printf(emptyfmt, Cray1) >= 0) | ^~~~~~~~ arithchk.c: In function 'need_nancheck': arithchk.c:160:16: warning: variable 't' set but not used [-Wunused-but-set-variable] 160 | double t; | ^ arithchk.c: In function 'main': cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_asin.o r_asin.c arithchk.c:190:20: warning: unused variable 'sb' [-Wunused-variable] 190 | size_t sa, sb; | ^~ arithchk.c:190:16: warning: unused variable 'sa' [-Wunused-variable] 190 | size_t sa, sb; | ^~ cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_atan.o r_atan.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_atn2.o r_atn2.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_cnjg.o r_cnjg.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_cos.o r_cos.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_cosh.o r_cosh.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_dim.o r_dim.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_exp.o r_exp.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_imag.o r_imag.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_int.o r_int.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_lg10.o r_lg10.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_log.o r_log.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_mod.o r_mod.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_nint.o r_nint.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_sign.o r_sign.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_sin.o r_sin.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_sinh.o r_sinh.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_sqrt.o r_sqrt.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_tan.o r_tan.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o r_tanh.o r_tanh.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_abs.o d_abs.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_acos.o d_acos.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_asin.o d_asin.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_atan.o d_atan.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_atn2.o d_atn2.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_cnjg.o d_cnjg.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_cos.o d_cos.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_cosh.o d_cosh.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_dim.o d_dim.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_exp.o d_exp.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_imag.o d_imag.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_int.o d_int.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_lg10.o d_lg10.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_log.o d_log.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_mod.o d_mod.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_nint.o d_nint.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_prod.o d_prod.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_sign.o d_sign.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_sin.o d_sin.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_sinh.o d_sinh.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_sqrt.o d_sqrt.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_tan.o d_tan.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o d_tanh.o d_tanh.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o i_abs.o i_abs.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o i_dim.o i_dim.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o i_dnnt.o i_dnnt.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o i_indx.o i_indx.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o i_len.o i_len.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o i_mod.o i_mod.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o i_nint.o i_nint.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o i_sign.o i_sign.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o lbitbits.o lbitbits.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o lbitshft.o lbitshft.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o h_abs.o h_abs.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o h_dim.o h_dim.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o h_dnnt.o h_dnnt.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o h_indx.o h_indx.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o h_len.o h_len.c lbitbits.c: In function 'lbit_cshift': cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o h_mod.o h_mod.c lbitbits.c:47:65: warning: suggest parentheses around '-' inside '>>' [-Wparentheses] 47 | return (integer)(x << b | x >> LONGBITS -b ); | ^ cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o h_nint.o h_nint.c lbitbits.c:51:48: warning: suggest parentheses around '-' inside '<<' [-Wparentheses] 51 | return (integer)(x << LONGBITS - b | x >> b); | ^ lbitbits.c:60:61: warning: suggest parentheses around '-' inside '>>' [-Wparentheses] 60 | return (integer)(y | z & (x << b | x >> len - b)); | ~~~~^~~ lbitbits.c:60:40: warning: suggest parentheses around arithmetic in operand of '|' [-Wparentheses] 60 | return (integer)(y | z & (x << b | x >> len - b)); | ~~^~~~~~~~~~~~~~~~~~~~~~~~~ cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o h_sign.o h_sign.c lbitbits.c:64:53: warning: suggest parentheses around '-' inside '<<' [-Wparentheses] 64 | return (integer)(y | z & (x >> b | x << len - b)); | ~~~~^~~ cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o l_ge.o l_ge.c lbitbits.c:64:32: warning: suggest parentheses around arithmetic in operand of '|' [-Wparentheses] 64 | return (integer)(y | z & (x >> b | x << len - b)); | ~~^~~~~~~~~~~~~~~~~~~~~~~~~ cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o l_gt.o l_gt.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o l_le.o l_le.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o l_lt.o l_lt.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o hl_ge.o hl_ge.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o hl_gt.o hl_gt.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o hl_le.o hl_le.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o hl_lt.o hl_lt.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o ef1asc_.o ef1asc_.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o ef1cmc_.o ef1cmc_.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o f77_aloc.o f77_aloc.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o s_cat.o s_cat.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o s_cmp.o s_cmp.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o s_copy.o s_copy.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o backspac.o backspac.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o close.o close.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o dfe.o dfe.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o dolio.o dolio.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o due.o due.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o endfile.o endfile.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o err.o err.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o fmt.o fmt.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o fmtlib.o fmtlib.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o ftell_.o ftell_.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o iio.o iio.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o ilnw.o ilnw.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o inquire.o inquire.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o lread.o lread.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o lwrite.o lwrite.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o open.o open.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o rdfmt.o rdfmt.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o rewind.o rewind.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o rsfe.o rsfe.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o rsli.o rsli.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o rsne.o rsne.c backspac.c: In function 'f_back': backspac.c:47:17: warning: ignoring return value of 'fread' declared with attribute 'warn_unused_result' [-Wunused-result] 47 | fread((char *)&n,sizeof(uiolen),1,f); | ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ dfe.c: In function 's_rdfe': dfe.c:104:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 104 | if(n=c_dfe(a))return(n); | ^ due.c: In function 's_rdue': dfe.c: In function 's_wdfe': due.c:40:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 40 | if(n=c_due(a)) return(n); | ^ dfe.c:126:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 126 | if(n=c_dfe(a)) return(n); | ^ due.c: In function 's_wdue': due.c:53:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 53 | if(n=c_due(a)) return(n); | ^ cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o sfe.o sfe.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o sue.o sue.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o typesize.o typesize.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o uio.o uio.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o util.o util.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o wref.o wref.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o wrtfmt.o wrtfmt.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o wsfe.o wsfe.c iio.c: In function 's_rsfi': iio.c:91:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 91 | if(n=c_si(a)) return(n); | ^ iio.c: In function 's_wsfi': iio.c:123:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 123 | if(n=c_si(a)) return(n); | ^ lwrite.c: In function 'l_g': lwrite.c:141:31: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 141 | while(b[0] = b[1]) | ^ endfile.c: In function 'f_end': lwrite.c:166:57: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 166 | for(c1 = '.', c = 'E'; *b = c1; | ^ endfile.c:46:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 46 | if (tf = FOPEN(nbuf, f__w_mode[0])) | ^~ lwrite.c: In function 'l_put': lwrite.c:190:15: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 190 | while(c = *s++) | ^ inquire.c: In function 'f_inqu': inquire.c:67:27: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 67 | if(byfile && x != -1 || !byfile && p!=NULL) | ~~~~~~~^~~~~~~~~~ inquire.c:66:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 66 | if(a->inex!=NULL) | ^ cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o wsle.o wsle.c inquire.c:70:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 70 | if(a->inopen!=NULL) | ^ inquire.c:75:38: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 75 | if(byfile || p!=NULL && p->ufnm!=NULL) | ^ inquire.c:74:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 74 | if(a->innamed!=NULL) | ^ inquire.c:78:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 78 | if(a->inname!=NULL) | ^ inquire.c:83:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 83 | if(a->inacc!=NULL && p!=NULL && p->ufd!=NULL) | ^ inquire.c:87:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 87 | if(a->inseq!=NULL) | ^ inquire.c:91:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 91 | if(a->indir!=NULL) | ^ inquire.c:95:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 95 | if(a->infmt!=NULL) | ^ inquire.c:99:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 99 | if(a->inform!=NULL) | ^ inquire.c:103:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 103 | if(a->inunf) | ^ inquire.c:112:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 112 | if(a->inblank && p!=NULL && p->ufmt) | ^ rsfe.c: In function 's_rsfe': rsfe.c:67:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 67 | if(n=c_sfe(a)) return(n); | ^ lread.c: In function 'l_C': lread.c:294:20: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 294 | if (rd_count(ch)) | ^ lread.c:317:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 317 | if (ch = l_R(1,0)) | ^~ ./a.out >arith.h lread.c:329:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 329 | if (ch = l_R(1,0)) | ^~ lread.c: In function 'nmL_getc': lread.c:356:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 356 | if (rv = *nmL_next++) | ^~ rdfmt.c: In function 'rd_Z': rdfmt.c:39:23: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 39 | while(ch = *sc++) | ^~ rdfmt.c:42:23: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 42 | while(ch = *sc++) | ^~ lread.c: In function 'l_L': lread.c:438:19: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 438 | if(GETC(ch)!='*') | ^ rdfmt.c:71:16: warning: suggest parentheses around '+' inside '>>' [-Wparentheses] 71 | w2 = w1+1 >> 1; | ~~^~ rdfmt.c:93:37: warning: suggest parentheses around '-' inside '<<' [-Wparentheses] 93 | *t = hex[*s0 & 0xff]-1 << 4 | hex[s0[1] & 0xff]-1; | ~~~~~~~~~~~~~~~^~ rdfmt.c:93:64: warning: suggest parentheses around arithmetic in operand of '|' [-Wparentheses] 93 | *t = hex[*s0 & 0xff]-1 << 4 | hex[s0[1] & 0xff]-1; | ~~~~~~~~~~~~~~~~~^~ rdfmt.c: In function 'rd_F': rdfmt.c:261:17: warning: this 'if' clause does not guard... [-Wmisleading-indentation] 261 | if (!w--) goto zero; GET(ch); } | ^~ In file included from rdfmt.c:15: fmt.h:89:16: note: ...this statement, but the latter is misleadingly indented as if it were guarded by the 'if' 89 | #define GET(x) if((x=(*f__getn)())<0) return(x) | ^~ rdfmt.c:261:38: note: in expansion of macro 'GET' 261 | if (!w--) goto zero; GET(ch); } | ^~~ lread.c: In function 'l_read': lread.c:109:19: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 109 | #define ERR(x) if(n=(x)) return(n) | ^ lread.c:693:25: note: in expansion of macro 'ERR' 693 | ERR(l_R(0,1)); | ^~~ lread.c:109:19: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 109 | #define ERR(x) if(n=(x)) return(n) | ^ lread.c:698:25: note: in expansion of macro 'ERR' 698 | ERR(l_R(0,0)); | ^~~ lread.c:109:19: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 109 | #define ERR(x) if(n=(x)) return(n) | ^ lread.c:709:25: note: in expansion of macro 'ERR' 709 | ERR(l_C()); | ^~~ lread.c:109:19: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 109 | #define ERR(x) if(n=(x)) return(n) | ^ lread.c:714:25: note: in expansion of macro 'ERR' 714 | ERR(l_L()); | ^~~ sue.c: In function 's_rsue': sue.c:38:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 38 | if(n=c_sue(a)) return(n); | ^ lread.c:109:19: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 109 | #define ERR(x) if(n=(x)) return(n) | ^ lread.c:717:25: note: in expansion of macro 'ERR' 717 | ERR(l_CHAR()); | ^~~ sue.c: In function 's_wsue': sue.c:61:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 61 | if(n=c_sue(a)) return(n); | ^ lread.c: In function 's_rsle': lread.c:790:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 790 | if(n=c_le(a)) return(n); | ^ cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o wsne.o wsne.c rsne.c: In function 'hash': rsne.c:86:20: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 86 | for(x = 0; c = *s++; x = x & 0x4000 ? ((x << 1) & 0x7fff) + 1 : x << 1) | ^ rsne.c: In function 'mk_hashtab': rsne.c:107:28: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 107 | for(x = &nl_cache; y = *x; x0 = x, x = &y->next) | ^ rsne.c: In function 'nl_init': rsne.c:159:47: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 159 | for(s = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"; c = *s++; ) | ^ rsne.c:165:32: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 165 | for(s = "0123456789_"; c = *s++; ) | ^ rsne.c: In function 'getname': rsne.c:188:15: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 188 | while(*s = Alphanum[GETC(ch) & 0xff]) | ^ rsne.c: In function 'getdimen': rsne.c:243:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 243 | if (k = getnum(chp, x1)) | ^ rsne.c:247:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 247 | if (k = getnum(chp, &x2)) | ^ rsne.c:251:29: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 251 | if (k = getnum(chp, &x3)) | ^ rsne.c: In function 'x_rsne': rsne.c:349:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 349 | if (ch = getname(buf,sizeof(buf))) | ^~ rsne.c:401:47: warning: suggest parentheses around '&&' within '||' [-Wparentheses] 401 | if (ch <= ' ' && ch >= 0 || ch == ',') | ~~~~~~~~~~^~~~~~~~~~ rsne.c:404:37: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 404 | if (ch = getname(buf,sizeof(buf))) | ^~ rsne.c:428:37: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 428 | if (k = getdimen(&ch, dn, (ftnlen)size, | ^ open.c: In function 'f_open': open.c:246:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 246 | if (tf = FOPEN(buf,f__w_mode[0])) | ^~ rsne.c:445:29: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 445 | if (k = getdimen(&ch, dn, size, nomax, &b)) | ^ open.c:256:21: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 256 | if (tf = FOPEN(buf, f__r_mode[ufmt])) | ^~ open.c:258:26: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 258 | else if (tf = FOPEN(buf, f__w_mode[ufmt])) { | ^~ rsne.c:456:37: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 456 | if (k = getdimen(&ch, dn1, dn->delta**dims, | ^ open.c:270:11: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 270 | if(b->useek) | ^ rsne.c:476:37: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 476 | if (k = getdimen(&ch, &substr, size, size, &b)) | ^ rsne.c:511:26: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 511 | else if (dims = v->dims) { | ^~~~ rsne.c:531:29: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 531 | if (k = l_read(&no1, vaddr + iva, size, type)) | ^ rsne.c:541:45: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 541 | if (k = l_read(&no2, vaddr + iva, | ^ rsne.c:549:28: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 549 | if (readall) | ^ rsne.c: In function 's_rsne': rsne.c:603:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 603 | if(n = c_le(a)) | ^ rm -f a.out arithchk.o cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o xwsne.o xwsne.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o dtime_.o dtime_.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o etime_.o etime_.c cc -c -O2 -flto=auto -ffat-lto-objects -fexceptions -g -grecord-gcc-switches -pipe -Wall -Werror=format-security -Wp,-D_FORTIFY_SOURCE=2 -Wp,-D_GLIBCXX_ASSERTIONS -specs=/usr/lib/rpm/OpenCloudOS/OpenCloudOS-hardened-cc1 -fstack-protector-strong -m64 -march=x86-64-v2 -mtune=generic -fasynchronous-unwind-tables -fstack-clash-protection -fcf-protection -fPIC -o uninit.o uninit.c wsle.c: In function 's_wsle': wsle.c:17:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 17 | if(n=c_le(a)) return(n); | ^ wref.c: In function 'wrt_E': wref.c:140:45: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 140 | for(s -= 2, e1 = 2; s[0] = s[1]; s++) | ^ wref.c: In function 'wrt_F': wref.c:236:13: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 236 | if (n = f__scale) | ^ wref.c:236:12: warning: suggest explicit braces to avoid ambiguous 'else' [-Wdangling-else] 236 | if (n = f__scale) | ^ wref.c:286:15: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 286 | while(n = *b++) | ^ wsfe.c: In function 's_wsfe': wsfe.c:55:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 55 | if(n=c_sfe(a)) return(n); | ^ wsne.c: In function 's_wsne': wsne.c:17:12: warning: suggest parentheses around assignment used as truth value [-Wparentheses] 17 | if(n=c_le(a)) | ^ rsne.c: In function 'mk_hashtab': rsne.c:112:19: warning: 'x0' may be used uninitialized [-Wmaybe-uninitialized] 112 | y = *x0; | ~~^~~~~ rsne.c:106:24: note: 'x0' was declared here 106 | hashtab **x, **x0, *y; | ^~ rsne.c: In function 'x_rsne': rsne.c:579:44: warning: 'dn0' may be used uninitialized [-Wmaybe-uninitialized] 579 | for(dn1 = dn0; dn1 <= dn; dn1++) { | ~~~~^~~~~ rsne.c:311:21: note: 'dn0' was declared here 311 | dimen *dn, *dn0, *dn1; | ^~~ rsne.c:579:44: warning: 'dn' may be used uninitialized [-Wmaybe-uninitialized] 579 | for(dn1 = dn0; dn1 <= dn; dn1++) { | ~~~~^~~~~ rsne.c:311:16: note: 'dn' was declared here 311 | dimen *dn, *dn0, *dn1; | ^~ ar r libf2c.a f77vers.o i77vers.o main.o s_rnge.o abort_.o exit_.o getarg_.o iargc_.o getenv_.o signal_.o s_stop.o s_paus.o system_.o cabs.o ctype.o derf_.o derfc_.o erf_.o erfc_.o sig_die.o uninit.o pow_ci.o pow_dd.o pow_di.o pow_hh.o pow_ii.o pow_ri.o pow_zi.o pow_zz.o c_abs.o c_cos.o c_div.o c_exp.o c_log.o c_sin.o c_sqrt.o z_abs.o z_cos.o z_div.o z_exp.o z_log.o z_sin.o z_sqrt.o r_abs.o r_acos.o r_asin.o r_atan.o r_atn2.o r_cnjg.o r_cos.o r_cosh.o r_dim.o r_exp.o r_imag.o r_int.o r_lg10.o r_log.o r_mod.o r_nint.o r_sign.o r_sin.o r_sinh.o r_sqrt.o r_tan.o r_tanh.o d_abs.o d_acos.o d_asin.o d_atan.o d_atn2.o d_cnjg.o d_cos.o d_cosh.o d_dim.o d_exp.o d_imag.o d_int.o d_lg10.o d_log.o d_mod.o d_nint.o d_prod.o d_sign.o d_sin.o d_sinh.o d_sqrt.o d_tan.o d_tanh.o i_abs.o i_dim.o i_dnnt.o i_indx.o i_len.o i_mod.o i_nint.o i_sign.o lbitbits.o lbitshft.o h_abs.o h_dim.o h_dnnt.o h_indx.o h_len.o h_mod.o h_nint.o h_sign.o l_ge.o l_gt.o l_le.o l_lt.o hl_ge.o hl_gt.o hl_le.o hl_lt.o ef1asc_.o ef1cmc_.o f77_aloc.o s_cat.o s_cmp.o s_copy.o backspac.o close.o dfe.o dolio.o due.o endfile.o err.o fmt.o fmtlib.o ftell_.o iio.o ilnw.o inquire.o lread.o lwrite.o open.o rdfmt.o rewind.o rsfe.o rsli.o rsne.o sfe.o sue.o typesize.o uio.o util.o wref.o wrtfmt.o wsfe.o wsle.o wsne.o xwsne.o dtime_.o etime_.o cc -shared -Wl,-soname,libf2c.so.0 -o libf2c.so.0.23 f77vers.o i77vers.o main.o s_rnge.o abort_.o exit_.o getarg_.o iargc_.o getenv_.o signal_.o s_stop.o s_paus.o system_.o cabs.o ctype.o derf_.o derfc_.o erf_.o erfc_.o sig_die.o uninit.o pow_ci.o pow_dd.o pow_di.o pow_hh.o pow_ii.o pow_ri.o pow_zi.o pow_zz.o c_abs.o c_cos.o c_div.o c_exp.o c_log.o c_sin.o c_sqrt.o z_abs.o z_cos.o z_div.o z_exp.o z_log.o z_sin.o z_sqrt.o r_abs.o r_acos.o r_asin.o r_atan.o r_atn2.o r_cnjg.o r_cos.o r_cosh.o r_dim.o r_exp.o r_imag.o r_int.o r_lg10.o r_log.o r_mod.o r_nint.o r_sign.o r_sin.o r_sinh.o r_sqrt.o r_tan.o r_tanh.o d_abs.o d_acos.o d_asin.o d_atan.o d_atn2.o d_cnjg.o d_cos.o d_cosh.o d_dim.o d_exp.o d_imag.o d_int.o d_lg10.o d_log.o d_mod.o d_nint.o d_prod.o d_sign.o d_sin.o d_sinh.o d_sqrt.o d_tan.o d_tanh.o i_abs.o i_dim.o i_dnnt.o i_indx.o i_len.o i_mod.o i_nint.o i_sign.o lbitbits.o lbitshft.o h_abs.o h_dim.o h_dnnt.o h_indx.o h_len.o h_mod.o h_nint.o h_sign.o l_ge.o l_gt.o l_le.o l_lt.o hl_ge.o hl_gt.o hl_le.o hl_lt.o ef1asc_.o ef1cmc_.o f77_aloc.o s_cat.o s_cmp.o s_copy.o backspac.o close.o dfe.o dolio.o due.o endfile.o err.o fmt.o fmtlib.o ftell_.o iio.o ilnw.o inquire.o lread.o lwrite.o open.o rdfmt.o rewind.o rsfe.o rsli.o rsne.o sfe.o sue.o typesize.o uio.o util.o wref.o wrtfmt.o wsfe.o wsle.o wsne.o xwsne.o dtime_.o etime_.o -lm -lc ar: creating libf2c.a ranlib libf2c.a make: Leaving directory '/builddir/build/BUILD/f2c-20210928/libf2c' + RPM_EC=0 ++ jobs -p + exit 0 Executing(%install): /bin/sh -e /var/tmp/rpm-tmp.M5zN8b + umask 022 + cd /builddir/build/BUILD + '[' /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64 '!=' / ']' + rm -rf /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64 ++ dirname /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64 + mkdir -p /builddir/build/BUILDROOT + mkdir /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64 + cd f2c-20210928 + install -D -p -m 644 src/f2c.h /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/include/f2c.h + install -D -p -m 755 src/f2c /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/bin/f2c + install -D -p -m 644 src/f2c.1t /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/share/man/man1/f2c.1 + install -D -p -m 755 libf2c/libf2c.so.0.23 /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/lib64/libf2c.so.0.23 + ln -sr /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/lib64/libf2c.so.0.23 /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/lib64/libf2c.so.0 + ln -sr /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/lib64/libf2c.so.0.23 /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/lib64/libf2c.so + sed -i s/@lib@/lib64/ fc + install -Dpm 0755 fc /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/bin/f77 + /usr/bin/find-debuginfo -j32 --strict-build-id -m -i --build-id-seed 20210928-1.oc9 --unique-debug-suffix -20210928-1.oc9.x86_64 --unique-debug-src-base f2c-20210928-1.oc9.x86_64 -S debugsourcefiles.list /builddir/build/BUILD/f2c-20210928 extracting debug info from /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/lib64/libf2c.so.0.23 extracting debug info from /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/bin/f2c 1775 blocks + /usr/lib/rpm/check-buildroot + /usr/lib/rpm/OpenCloudOS/brp-ldconfig + /usr/lib/rpm/brp-compress + /usr/lib/rpm/OpenCloudOS/brp-strip-lto /usr/bin/strip + /usr/lib/rpm/brp-strip-static-archive /usr/bin/strip + /usr/lib/rpm/check-rpaths + /usr/lib/rpm/OpenCloudOS/brp-mangle-shebangs mangling shebang in /usr/bin/f77 from /bin/bash to #!/usr/bin/bash + /usr/lib/rpm/OpenCloudOS/brp-python-bytecompile '' 1 0 + /usr/lib/rpm/OpenCloudOS/brp-python-hardlink Processing files: f2c-20210928-1.oc9.x86_64 Executing(%doc): /bin/sh -e /var/tmp/rpm-tmp.sx3Eam + umask 022 + cd /builddir/build/BUILD + cd f2c-20210928 + DOCDIR=/builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/share/doc/f2c + export LC_ALL=C + LC_ALL=C + export DOCDIR + /usr/bin/mkdir -p /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/share/doc/f2c + cp -pr f2c.ps /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/share/doc/f2c + cp -pr f2c.pdf /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/share/doc/f2c + cp -pr src/changes /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/share/doc/f2c + cp -pr src/README /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/share/doc/f2c + RPM_EC=0 ++ jobs -p + exit 0 Executing(%license): /bin/sh -e /var/tmp/rpm-tmp.mnnXfC + umask 022 + cd /builddir/build/BUILD + cd f2c-20210928 + LICENSEDIR=/builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/share/licenses/f2c + export LC_ALL=C + LC_ALL=C + export LICENSEDIR + /usr/bin/mkdir -p /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/share/licenses/f2c + cp -pr src/Notice /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/share/licenses/f2c + RPM_EC=0 ++ jobs -p + exit 0 Provides: f2c = 20210928-1.oc9 f2c(x86-64) = 20210928-1.oc9 f2c-devel = 20210928-1.oc9 Requires(rpmlib): rpmlib(CompressedFileNames) <= 3.0.4-1 rpmlib(FileDigests) <= 4.6.0-1 rpmlib(PayloadFilesHavePrefix) <= 4.0-1 Requires: /usr/bin/bash libc.so.6()(64bit) libc.so.6(GLIBC_2.14)(64bit) libc.so.6(GLIBC_2.2.5)(64bit) libc.so.6(GLIBC_2.3)(64bit) libc.so.6(GLIBC_2.3.4)(64bit) libc.so.6(GLIBC_2.34)(64bit) libc.so.6(GLIBC_2.4)(64bit) libc.so.6(GLIBC_2.7)(64bit) libf2c.so.0()(64bit) rtld(GNU_HASH) Processing files: f2c-libs-20210928-1.oc9.x86_64 Executing(%doc): /bin/sh -e /var/tmp/rpm-tmp.l84MbU + umask 022 + cd /builddir/build/BUILD + cd f2c-20210928 + DOCDIR=/builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/share/doc/f2c-libs + export LC_ALL=C + LC_ALL=C + export DOCDIR + /usr/bin/mkdir -p /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/share/doc/f2c-libs + cp -pr libf2c/README /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/share/doc/f2c-libs + RPM_EC=0 ++ jobs -p + exit 0 Executing(%license): /bin/sh -e /var/tmp/rpm-tmp.Hh5cdi + umask 022 + cd /builddir/build/BUILD + cd f2c-20210928 + LICENSEDIR=/builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/share/licenses/f2c-libs + export LC_ALL=C + LC_ALL=C + export LICENSEDIR + /usr/bin/mkdir -p /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/share/licenses/f2c-libs + cp -pr libf2c/Notice /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64/usr/share/licenses/f2c-libs + RPM_EC=0 ++ jobs -p + exit 0 Provides: f2c-libs = 20210928-1.oc9 f2c-libs(x86-64) = 20210928-1.oc9 libf2c.so.0()(64bit) Requires(rpmlib): rpmlib(CompressedFileNames) <= 3.0.4-1 rpmlib(FileDigests) <= 4.6.0-1 rpmlib(PayloadFilesHavePrefix) <= 4.0-1 Requires: libc.so.6()(64bit) libc.so.6(GLIBC_2.14)(64bit) libc.so.6(GLIBC_2.2.5)(64bit) libc.so.6(GLIBC_2.3.4)(64bit) libc.so.6(GLIBC_2.33)(64bit) libc.so.6(GLIBC_2.4)(64bit) libm.so.6()(64bit) libm.so.6(GLIBC_2.2.5)(64bit) libm.so.6(GLIBC_2.29)(64bit) rtld(GNU_HASH) Processing files: f2c-debugsource-20210928-1.oc9.x86_64 Provides: f2c-debugsource = 20210928-1.oc9 f2c-debugsource(x86-64) = 20210928-1.oc9 Requires(rpmlib): rpmlib(CompressedFileNames) <= 3.0.4-1 rpmlib(FileDigests) <= 4.6.0-1 rpmlib(PayloadFilesHavePrefix) <= 4.0-1 Processing files: f2c-debuginfo-20210928-1.oc9.x86_64 Provides: debuginfo(build-id) = 3292d7e4bcd285b134b9a876c1d971e8d2801421 f2c-debuginfo = 20210928-1.oc9 f2c-debuginfo(x86-64) = 20210928-1.oc9 Requires(rpmlib): rpmlib(CompressedFileNames) <= 3.0.4-1 rpmlib(FileDigests) <= 4.6.0-1 rpmlib(PayloadFilesHavePrefix) <= 4.0-1 Recommends: f2c-debugsource(x86-64) = 20210928-1.oc9 Processing files: f2c-libs-debuginfo-20210928-1.oc9.x86_64 Provides: debuginfo(build-id) = 2e9f510c5ee9ac2b2f1fe02659bd5d0bddd56795 f2c-libs-debuginfo = 20210928-1.oc9 f2c-libs-debuginfo(x86-64) = 20210928-1.oc9 libf2c.so.0.23-20210928-1.oc9.x86_64.debug()(64bit) Requires(rpmlib): rpmlib(CompressedFileNames) <= 3.0.4-1 rpmlib(FileDigests) <= 4.6.0-1 rpmlib(PayloadFilesHavePrefix) <= 4.0-1 Recommends: f2c-debugsource(x86-64) = 20210928-1.oc9 Checking for unpackaged file(s): /usr/lib/rpm/check-files /builddir/build/BUILDROOT/f2c-20210928-1.oc9.x86_64 Wrote: /builddir/build/RPMS/f2c-libs-20210928-1.oc9.x86_64.rpm Wrote: /builddir/build/RPMS/f2c-libs-debuginfo-20210928-1.oc9.x86_64.rpm Wrote: /builddir/build/RPMS/f2c-debugsource-20210928-1.oc9.x86_64.rpm Wrote: /builddir/build/RPMS/f2c-20210928-1.oc9.x86_64.rpm Wrote: /builddir/build/RPMS/f2c-debuginfo-20210928-1.oc9.x86_64.rpm Child return code was: 0