aboutsummaryrefslogtreecommitdiff
path: root/gcc/vmsdbgout.c
diff options
context:
space:
mode:
authorMartin Liska <mliska@suse.cz>2022-01-14 16:56:44 +0100
committerMartin Liska <mliska@suse.cz>2022-01-17 22:12:04 +0100
commit5c69acb32329d49e58c26fa41ae74229a52b9106 (patch)
treeddb05f9d73afb6f998457d2ac4b720e3b3b60483 /gcc/vmsdbgout.c
parent490e23032baaece71f2ec09fa1805064b150fbc2 (diff)
downloadgcc-5c69acb32329d49e58c26fa41ae74229a52b9106.zip
gcc-5c69acb32329d49e58c26fa41ae74229a52b9106.tar.gz
gcc-5c69acb32329d49e58c26fa41ae74229a52b9106.tar.bz2
Rename .c files to .cc files.
gcc/ada/ChangeLog: * adadecode.c: Moved to... * adadecode.cc: ...here. * affinity.c: Moved to... * affinity.cc: ...here. * argv-lynxos178-raven-cert.c: Moved to... * argv-lynxos178-raven-cert.cc: ...here. * argv.c: Moved to... * argv.cc: ...here. * aux-io.c: Moved to... * aux-io.cc: ...here. * cio.c: Moved to... * cio.cc: ...here. * cstreams.c: Moved to... * cstreams.cc: ...here. * env.c: Moved to... * env.cc: ...here. * exit.c: Moved to... * exit.cc: ...here. * expect.c: Moved to... * expect.cc: ...here. * final.c: Moved to... * final.cc: ...here. * gcc-interface/cuintp.c: Moved to... * gcc-interface/cuintp.cc: ...here. * gcc-interface/decl.c: Moved to... * gcc-interface/decl.cc: ...here. * gcc-interface/misc.c: Moved to... * gcc-interface/misc.cc: ...here. * gcc-interface/targtyps.c: Moved to... * gcc-interface/targtyps.cc: ...here. * gcc-interface/trans.c: Moved to... * gcc-interface/trans.cc: ...here. * gcc-interface/utils.c: Moved to... * gcc-interface/utils.cc: ...here. * gcc-interface/utils2.c: Moved to... * gcc-interface/utils2.cc: ...here. * init.c: Moved to... * init.cc: ...here. * initialize.c: Moved to... * initialize.cc: ...here. * libgnarl/thread.c: Moved to... * libgnarl/thread.cc: ...here. * link.c: Moved to... * link.cc: ...here. * locales.c: Moved to... * locales.cc: ...here. * mkdir.c: Moved to... * mkdir.cc: ...here. * raise.c: Moved to... * raise.cc: ...here. * rtfinal.c: Moved to... * rtfinal.cc: ...here. * rtinit.c: Moved to... * rtinit.cc: ...here. * seh_init.c: Moved to... * seh_init.cc: ...here. * sigtramp-armdroid.c: Moved to... * sigtramp-armdroid.cc: ...here. * sigtramp-ios.c: Moved to... * sigtramp-ios.cc: ...here. * sigtramp-qnx.c: Moved to... * sigtramp-qnx.cc: ...here. * sigtramp-vxworks.c: Moved to... * sigtramp-vxworks.cc: ...here. * socket.c: Moved to... * socket.cc: ...here. * tracebak.c: Moved to... * tracebak.cc: ...here. * version.c: Moved to... * version.cc: ...here. * vx_stack_info.c: Moved to... * vx_stack_info.cc: ...here. gcc/ChangeLog: * adjust-alignment.c: Moved to... * adjust-alignment.cc: ...here. * alias.c: Moved to... * alias.cc: ...here. * alloc-pool.c: Moved to... * alloc-pool.cc: ...here. * asan.c: Moved to... * asan.cc: ...here. * attribs.c: Moved to... * attribs.cc: ...here. * auto-inc-dec.c: Moved to... * auto-inc-dec.cc: ...here. * auto-profile.c: Moved to... * auto-profile.cc: ...here. * bb-reorder.c: Moved to... * bb-reorder.cc: ...here. * bitmap.c: Moved to... * bitmap.cc: ...here. * btfout.c: Moved to... * btfout.cc: ...here. * builtins.c: Moved to... * builtins.cc: ...here. * caller-save.c: Moved to... * caller-save.cc: ...here. * calls.c: Moved to... * calls.cc: ...here. * ccmp.c: Moved to... * ccmp.cc: ...here. * cfg.c: Moved to... * cfg.cc: ...here. * cfganal.c: Moved to... * cfganal.cc: ...here. * cfgbuild.c: Moved to... * cfgbuild.cc: ...here. * cfgcleanup.c: Moved to... * cfgcleanup.cc: ...here. * cfgexpand.c: Moved to... * cfgexpand.cc: ...here. * cfghooks.c: Moved to... * cfghooks.cc: ...here. * cfgloop.c: Moved to... * cfgloop.cc: ...here. * cfgloopanal.c: Moved to... * cfgloopanal.cc: ...here. * cfgloopmanip.c: Moved to... * cfgloopmanip.cc: ...here. * cfgrtl.c: Moved to... * cfgrtl.cc: ...here. * cgraph.c: Moved to... * cgraph.cc: ...here. * cgraphbuild.c: Moved to... * cgraphbuild.cc: ...here. * cgraphclones.c: Moved to... * cgraphclones.cc: ...here. * cgraphunit.c: Moved to... * cgraphunit.cc: ...here. * collect-utils.c: Moved to... * collect-utils.cc: ...here. * collect2-aix.c: Moved to... * collect2-aix.cc: ...here. * collect2.c: Moved to... * collect2.cc: ...here. * combine-stack-adj.c: Moved to... * combine-stack-adj.cc: ...here. * combine.c: Moved to... * combine.cc: ...here. * common/common-targhooks.c: Moved to... * common/common-targhooks.cc: ...here. * common/config/aarch64/aarch64-common.c: Moved to... * common/config/aarch64/aarch64-common.cc: ...here. * common/config/alpha/alpha-common.c: Moved to... * common/config/alpha/alpha-common.cc: ...here. * common/config/arc/arc-common.c: Moved to... * common/config/arc/arc-common.cc: ...here. * common/config/arm/arm-common.c: Moved to... * common/config/arm/arm-common.cc: ...here. * common/config/avr/avr-common.c: Moved to... * common/config/avr/avr-common.cc: ...here. * common/config/bfin/bfin-common.c: Moved to... * common/config/bfin/bfin-common.cc: ...here. * common/config/bpf/bpf-common.c: Moved to... * common/config/bpf/bpf-common.cc: ...here. * common/config/c6x/c6x-common.c: Moved to... * common/config/c6x/c6x-common.cc: ...here. * common/config/cr16/cr16-common.c: Moved to... * common/config/cr16/cr16-common.cc: ...here. * common/config/cris/cris-common.c: Moved to... * common/config/cris/cris-common.cc: ...here. * common/config/csky/csky-common.c: Moved to... * common/config/csky/csky-common.cc: ...here. * common/config/default-common.c: Moved to... * common/config/default-common.cc: ...here. * common/config/epiphany/epiphany-common.c: Moved to... * common/config/epiphany/epiphany-common.cc: ...here. * common/config/fr30/fr30-common.c: Moved to... * common/config/fr30/fr30-common.cc: ...here. * common/config/frv/frv-common.c: Moved to... * common/config/frv/frv-common.cc: ...here. * common/config/gcn/gcn-common.c: Moved to... * common/config/gcn/gcn-common.cc: ...here. * common/config/h8300/h8300-common.c: Moved to... * common/config/h8300/h8300-common.cc: ...here. * common/config/i386/i386-common.c: Moved to... * common/config/i386/i386-common.cc: ...here. * common/config/ia64/ia64-common.c: Moved to... * common/config/ia64/ia64-common.cc: ...here. * common/config/iq2000/iq2000-common.c: Moved to... * common/config/iq2000/iq2000-common.cc: ...here. * common/config/lm32/lm32-common.c: Moved to... * common/config/lm32/lm32-common.cc: ...here. * common/config/m32r/m32r-common.c: Moved to... * common/config/m32r/m32r-common.cc: ...here. * common/config/m68k/m68k-common.c: Moved to... * common/config/m68k/m68k-common.cc: ...here. * common/config/mcore/mcore-common.c: Moved to... * common/config/mcore/mcore-common.cc: ...here. * common/config/microblaze/microblaze-common.c: Moved to... * common/config/microblaze/microblaze-common.cc: ...here. * common/config/mips/mips-common.c: Moved to... * common/config/mips/mips-common.cc: ...here. * common/config/mmix/mmix-common.c: Moved to... * common/config/mmix/mmix-common.cc: ...here. * common/config/mn10300/mn10300-common.c: Moved to... * common/config/mn10300/mn10300-common.cc: ...here. * common/config/msp430/msp430-common.c: Moved to... * common/config/msp430/msp430-common.cc: ...here. * common/config/nds32/nds32-common.c: Moved to... * common/config/nds32/nds32-common.cc: ...here. * common/config/nios2/nios2-common.c: Moved to... * common/config/nios2/nios2-common.cc: ...here. * common/config/nvptx/nvptx-common.c: Moved to... * common/config/nvptx/nvptx-common.cc: ...here. * common/config/or1k/or1k-common.c: Moved to... * common/config/or1k/or1k-common.cc: ...here. * common/config/pa/pa-common.c: Moved to... * common/config/pa/pa-common.cc: ...here. * common/config/pdp11/pdp11-common.c: Moved to... * common/config/pdp11/pdp11-common.cc: ...here. * common/config/pru/pru-common.c: Moved to... * common/config/pru/pru-common.cc: ...here. * common/config/riscv/riscv-common.c: Moved to... * common/config/riscv/riscv-common.cc: ...here. * common/config/rs6000/rs6000-common.c: Moved to... * common/config/rs6000/rs6000-common.cc: ...here. * common/config/rx/rx-common.c: Moved to... * common/config/rx/rx-common.cc: ...here. * common/config/s390/s390-common.c: Moved to... * common/config/s390/s390-common.cc: ...here. * common/config/sh/sh-common.c: Moved to... * common/config/sh/sh-common.cc: ...here. * common/config/sparc/sparc-common.c: Moved to... * common/config/sparc/sparc-common.cc: ...here. * common/config/tilegx/tilegx-common.c: Moved to... * common/config/tilegx/tilegx-common.cc: ...here. * common/config/tilepro/tilepro-common.c: Moved to... * common/config/tilepro/tilepro-common.cc: ...here. * common/config/v850/v850-common.c: Moved to... * common/config/v850/v850-common.cc: ...here. * common/config/vax/vax-common.c: Moved to... * common/config/vax/vax-common.cc: ...here. * common/config/visium/visium-common.c: Moved to... * common/config/visium/visium-common.cc: ...here. * common/config/xstormy16/xstormy16-common.c: Moved to... * common/config/xstormy16/xstormy16-common.cc: ...here. * common/config/xtensa/xtensa-common.c: Moved to... * common/config/xtensa/xtensa-common.cc: ...here. * compare-elim.c: Moved to... * compare-elim.cc: ...here. * config/aarch64/aarch64-bti-insert.c: Moved to... * config/aarch64/aarch64-bti-insert.cc: ...here. * config/aarch64/aarch64-builtins.c: Moved to... * config/aarch64/aarch64-builtins.cc: ...here. * config/aarch64/aarch64-c.c: Moved to... * config/aarch64/aarch64-c.cc: ...here. * config/aarch64/aarch64-d.c: Moved to... * config/aarch64/aarch64-d.cc: ...here. * config/aarch64/aarch64.c: Moved to... * config/aarch64/aarch64.cc: ...here. * config/aarch64/cortex-a57-fma-steering.c: Moved to... * config/aarch64/cortex-a57-fma-steering.cc: ...here. * config/aarch64/driver-aarch64.c: Moved to... * config/aarch64/driver-aarch64.cc: ...here. * config/aarch64/falkor-tag-collision-avoidance.c: Moved to... * config/aarch64/falkor-tag-collision-avoidance.cc: ...here. * config/aarch64/host-aarch64-darwin.c: Moved to... * config/aarch64/host-aarch64-darwin.cc: ...here. * config/alpha/alpha.c: Moved to... * config/alpha/alpha.cc: ...here. * config/alpha/driver-alpha.c: Moved to... * config/alpha/driver-alpha.cc: ...here. * config/arc/arc-c.c: Moved to... * config/arc/arc-c.cc: ...here. * config/arc/arc.c: Moved to... * config/arc/arc.cc: ...here. * config/arc/driver-arc.c: Moved to... * config/arc/driver-arc.cc: ...here. * config/arm/aarch-common.c: Moved to... * config/arm/aarch-common.cc: ...here. * config/arm/arm-builtins.c: Moved to... * config/arm/arm-builtins.cc: ...here. * config/arm/arm-c.c: Moved to... * config/arm/arm-c.cc: ...here. * config/arm/arm-d.c: Moved to... * config/arm/arm-d.cc: ...here. * config/arm/arm.c: Moved to... * config/arm/arm.cc: ...here. * config/arm/driver-arm.c: Moved to... * config/arm/driver-arm.cc: ...here. * config/avr/avr-c.c: Moved to... * config/avr/avr-c.cc: ...here. * config/avr/avr-devices.c: Moved to... * config/avr/avr-devices.cc: ...here. * config/avr/avr-log.c: Moved to... * config/avr/avr-log.cc: ...here. * config/avr/avr.c: Moved to... * config/avr/avr.cc: ...here. * config/avr/driver-avr.c: Moved to... * config/avr/driver-avr.cc: ...here. * config/avr/gen-avr-mmcu-specs.c: Moved to... * config/avr/gen-avr-mmcu-specs.cc: ...here. * config/avr/gen-avr-mmcu-texi.c: Moved to... * config/avr/gen-avr-mmcu-texi.cc: ...here. * config/bfin/bfin.c: Moved to... * config/bfin/bfin.cc: ...here. * config/bpf/bpf.c: Moved to... * config/bpf/bpf.cc: ...here. * config/bpf/coreout.c: Moved to... * config/bpf/coreout.cc: ...here. * config/c6x/c6x.c: Moved to... * config/c6x/c6x.cc: ...here. * config/cr16/cr16.c: Moved to... * config/cr16/cr16.cc: ...here. * config/cris/cris.c: Moved to... * config/cris/cris.cc: ...here. * config/csky/csky.c: Moved to... * config/csky/csky.cc: ...here. * config/darwin-c.c: Moved to... * config/darwin-c.cc: ...here. * config/darwin-d.c: Moved to... * config/darwin-d.cc: ...here. * config/darwin-driver.c: Moved to... * config/darwin-driver.cc: ...here. * config/darwin-f.c: Moved to... * config/darwin-f.cc: ...here. * config/darwin.c: Moved to... * config/darwin.cc: ...here. * config/default-c.c: Moved to... * config/default-c.cc: ...here. * config/default-d.c: Moved to... * config/default-d.cc: ...here. * config/dragonfly-d.c: Moved to... * config/dragonfly-d.cc: ...here. * config/epiphany/epiphany.c: Moved to... * config/epiphany/epiphany.cc: ...here. * config/epiphany/mode-switch-use.c: Moved to... * config/epiphany/mode-switch-use.cc: ...here. * config/epiphany/resolve-sw-modes.c: Moved to... * config/epiphany/resolve-sw-modes.cc: ...here. * config/fr30/fr30.c: Moved to... * config/fr30/fr30.cc: ...here. * config/freebsd-d.c: Moved to... * config/freebsd-d.cc: ...here. * config/frv/frv.c: Moved to... * config/frv/frv.cc: ...here. * config/ft32/ft32.c: Moved to... * config/ft32/ft32.cc: ...here. * config/gcn/driver-gcn.c: Moved to... * config/gcn/driver-gcn.cc: ...here. * config/gcn/gcn-run.c: Moved to... * config/gcn/gcn-run.cc: ...here. * config/gcn/gcn-tree.c: Moved to... * config/gcn/gcn-tree.cc: ...here. * config/gcn/gcn.c: Moved to... * config/gcn/gcn.cc: ...here. * config/gcn/mkoffload.c: Moved to... * config/gcn/mkoffload.cc: ...here. * config/glibc-c.c: Moved to... * config/glibc-c.cc: ...here. * config/glibc-d.c: Moved to... * config/glibc-d.cc: ...here. * config/h8300/h8300.c: Moved to... * config/h8300/h8300.cc: ...here. * config/host-darwin.c: Moved to... * config/host-darwin.cc: ...here. * config/host-hpux.c: Moved to... * config/host-hpux.cc: ...here. * config/host-linux.c: Moved to... * config/host-linux.cc: ...here. * config/host-netbsd.c: Moved to... * config/host-netbsd.cc: ...here. * config/host-openbsd.c: Moved to... * config/host-openbsd.cc: ...here. * config/host-solaris.c: Moved to... * config/host-solaris.cc: ...here. * config/i386/djgpp.c: Moved to... * config/i386/djgpp.cc: ...here. * config/i386/driver-i386.c: Moved to... * config/i386/driver-i386.cc: ...here. * config/i386/driver-mingw32.c: Moved to... * config/i386/driver-mingw32.cc: ...here. * config/i386/gnu-property.c: Moved to... * config/i386/gnu-property.cc: ...here. * config/i386/host-cygwin.c: Moved to... * config/i386/host-cygwin.cc: ...here. * config/i386/host-i386-darwin.c: Moved to... * config/i386/host-i386-darwin.cc: ...here. * config/i386/host-mingw32.c: Moved to... * config/i386/host-mingw32.cc: ...here. * config/i386/i386-builtins.c: Moved to... * config/i386/i386-builtins.cc: ...here. * config/i386/i386-c.c: Moved to... * config/i386/i386-c.cc: ...here. * config/i386/i386-d.c: Moved to... * config/i386/i386-d.cc: ...here. * config/i386/i386-expand.c: Moved to... * config/i386/i386-expand.cc: ...here. * config/i386/i386-features.c: Moved to... * config/i386/i386-features.cc: ...here. * config/i386/i386-options.c: Moved to... * config/i386/i386-options.cc: ...here. * config/i386/i386.c: Moved to... * config/i386/i386.cc: ...here. * config/i386/intelmic-mkoffload.c: Moved to... * config/i386/intelmic-mkoffload.cc: ...here. * config/i386/msformat-c.c: Moved to... * config/i386/msformat-c.cc: ...here. * config/i386/winnt-cxx.c: Moved to... * config/i386/winnt-cxx.cc: ...here. * config/i386/winnt-d.c: Moved to... * config/i386/winnt-d.cc: ...here. * config/i386/winnt-stubs.c: Moved to... * config/i386/winnt-stubs.cc: ...here. * config/i386/winnt.c: Moved to... * config/i386/winnt.cc: ...here. * config/i386/x86-tune-sched-atom.c: Moved to... * config/i386/x86-tune-sched-atom.cc: ...here. * config/i386/x86-tune-sched-bd.c: Moved to... * config/i386/x86-tune-sched-bd.cc: ...here. * config/i386/x86-tune-sched-core.c: Moved to... * config/i386/x86-tune-sched-core.cc: ...here. * config/i386/x86-tune-sched.c: Moved to... * config/i386/x86-tune-sched.cc: ...here. * config/ia64/ia64-c.c: Moved to... * config/ia64/ia64-c.cc: ...here. * config/ia64/ia64.c: Moved to... * config/ia64/ia64.cc: ...here. * config/iq2000/iq2000.c: Moved to... * config/iq2000/iq2000.cc: ...here. * config/linux.c: Moved to... * config/linux.cc: ...here. * config/lm32/lm32.c: Moved to... * config/lm32/lm32.cc: ...here. * config/m32c/m32c-pragma.c: Moved to... * config/m32c/m32c-pragma.cc: ...here. * config/m32c/m32c.c: Moved to... * config/m32c/m32c.cc: ...here. * config/m32r/m32r.c: Moved to... * config/m32r/m32r.cc: ...here. * config/m68k/m68k.c: Moved to... * config/m68k/m68k.cc: ...here. * config/mcore/mcore.c: Moved to... * config/mcore/mcore.cc: ...here. * config/microblaze/microblaze-c.c: Moved to... * config/microblaze/microblaze-c.cc: ...here. * config/microblaze/microblaze.c: Moved to... * config/microblaze/microblaze.cc: ...here. * config/mips/driver-native.c: Moved to... * config/mips/driver-native.cc: ...here. * config/mips/frame-header-opt.c: Moved to... * config/mips/frame-header-opt.cc: ...here. * config/mips/mips-d.c: Moved to... * config/mips/mips-d.cc: ...here. * config/mips/mips.c: Moved to... * config/mips/mips.cc: ...here. * config/mmix/mmix.c: Moved to... * config/mmix/mmix.cc: ...here. * config/mn10300/mn10300.c: Moved to... * config/mn10300/mn10300.cc: ...here. * config/moxie/moxie.c: Moved to... * config/moxie/moxie.cc: ...here. * config/msp430/driver-msp430.c: Moved to... * config/msp430/driver-msp430.cc: ...here. * config/msp430/msp430-c.c: Moved to... * config/msp430/msp430-c.cc: ...here. * config/msp430/msp430-devices.c: Moved to... * config/msp430/msp430-devices.cc: ...here. * config/msp430/msp430.c: Moved to... * config/msp430/msp430.cc: ...here. * config/nds32/nds32-cost.c: Moved to... * config/nds32/nds32-cost.cc: ...here. * config/nds32/nds32-fp-as-gp.c: Moved to... * config/nds32/nds32-fp-as-gp.cc: ...here. * config/nds32/nds32-intrinsic.c: Moved to... * config/nds32/nds32-intrinsic.cc: ...here. * config/nds32/nds32-isr.c: Moved to... * config/nds32/nds32-isr.cc: ...here. * config/nds32/nds32-md-auxiliary.c: Moved to... * config/nds32/nds32-md-auxiliary.cc: ...here. * config/nds32/nds32-memory-manipulation.c: Moved to... * config/nds32/nds32-memory-manipulation.cc: ...here. * config/nds32/nds32-pipelines-auxiliary.c: Moved to... * config/nds32/nds32-pipelines-auxiliary.cc: ...here. * config/nds32/nds32-predicates.c: Moved to... * config/nds32/nds32-predicates.cc: ...here. * config/nds32/nds32-relax-opt.c: Moved to... * config/nds32/nds32-relax-opt.cc: ...here. * config/nds32/nds32-utils.c: Moved to... * config/nds32/nds32-utils.cc: ...here. * config/nds32/nds32.c: Moved to... * config/nds32/nds32.cc: ...here. * config/netbsd-d.c: Moved to... * config/netbsd-d.cc: ...here. * config/netbsd.c: Moved to... * config/netbsd.cc: ...here. * config/nios2/nios2.c: Moved to... * config/nios2/nios2.cc: ...here. * config/nvptx/mkoffload.c: Moved to... * config/nvptx/mkoffload.cc: ...here. * config/nvptx/nvptx-c.c: Moved to... * config/nvptx/nvptx-c.cc: ...here. * config/nvptx/nvptx.c: Moved to... * config/nvptx/nvptx.cc: ...here. * config/openbsd-d.c: Moved to... * config/openbsd-d.cc: ...here. * config/or1k/or1k.c: Moved to... * config/or1k/or1k.cc: ...here. * config/pa/pa-d.c: Moved to... * config/pa/pa-d.cc: ...here. * config/pa/pa.c: Moved to... * config/pa/pa.cc: ...here. * config/pdp11/pdp11.c: Moved to... * config/pdp11/pdp11.cc: ...here. * config/pru/pru-passes.c: Moved to... * config/pru/pru-passes.cc: ...here. * config/pru/pru-pragma.c: Moved to... * config/pru/pru-pragma.cc: ...here. * config/pru/pru.c: Moved to... * config/pru/pru.cc: ...here. * config/riscv/riscv-builtins.c: Moved to... * config/riscv/riscv-builtins.cc: ...here. * config/riscv/riscv-c.c: Moved to... * config/riscv/riscv-c.cc: ...here. * config/riscv/riscv-d.c: Moved to... * config/riscv/riscv-d.cc: ...here. * config/riscv/riscv-shorten-memrefs.c: Moved to... * config/riscv/riscv-shorten-memrefs.cc: ...here. * config/riscv/riscv-sr.c: Moved to... * config/riscv/riscv-sr.cc: ...here. * config/riscv/riscv.c: Moved to... * config/riscv/riscv.cc: ...here. * config/rl78/rl78-c.c: Moved to... * config/rl78/rl78-c.cc: ...here. * config/rl78/rl78.c: Moved to... * config/rl78/rl78.cc: ...here. * config/rs6000/driver-rs6000.c: Moved to... * config/rs6000/driver-rs6000.cc: ...here. * config/rs6000/host-darwin.c: Moved to... * config/rs6000/host-darwin.cc: ...here. * config/rs6000/host-ppc64-darwin.c: Moved to... * config/rs6000/host-ppc64-darwin.cc: ...here. * config/rs6000/rbtree.c: Moved to... * config/rs6000/rbtree.cc: ...here. * config/rs6000/rs6000-c.c: Moved to... * config/rs6000/rs6000-c.cc: ...here. * config/rs6000/rs6000-call.c: Moved to... * config/rs6000/rs6000-call.cc: ...here. * config/rs6000/rs6000-d.c: Moved to... * config/rs6000/rs6000-d.cc: ...here. * config/rs6000/rs6000-gen-builtins.c: Moved to... * config/rs6000/rs6000-gen-builtins.cc: ...here. * config/rs6000/rs6000-linux.c: Moved to... * config/rs6000/rs6000-linux.cc: ...here. * config/rs6000/rs6000-logue.c: Moved to... * config/rs6000/rs6000-logue.cc: ...here. * config/rs6000/rs6000-p8swap.c: Moved to... * config/rs6000/rs6000-p8swap.cc: ...here. * config/rs6000/rs6000-pcrel-opt.c: Moved to... * config/rs6000/rs6000-pcrel-opt.cc: ...here. * config/rs6000/rs6000-string.c: Moved to... * config/rs6000/rs6000-string.cc: ...here. * config/rs6000/rs6000.c: Moved to... * config/rs6000/rs6000.cc: ...here. * config/rx/rx.c: Moved to... * config/rx/rx.cc: ...here. * config/s390/driver-native.c: Moved to... * config/s390/driver-native.cc: ...here. * config/s390/s390-c.c: Moved to... * config/s390/s390-c.cc: ...here. * config/s390/s390-d.c: Moved to... * config/s390/s390-d.cc: ...here. * config/s390/s390.c: Moved to... * config/s390/s390.cc: ...here. * config/sh/divtab-sh4-300.c: Moved to... * config/sh/divtab-sh4-300.cc: ...here. * config/sh/divtab-sh4.c: Moved to... * config/sh/divtab-sh4.cc: ...here. * config/sh/divtab.c: Moved to... * config/sh/divtab.cc: ...here. * config/sh/sh-c.c: Moved to... * config/sh/sh-c.cc: ...here. * config/sh/sh.c: Moved to... * config/sh/sh.cc: ...here. * config/sol2-c.c: Moved to... * config/sol2-c.cc: ...here. * config/sol2-cxx.c: Moved to... * config/sol2-cxx.cc: ...here. * config/sol2-d.c: Moved to... * config/sol2-d.cc: ...here. * config/sol2-stubs.c: Moved to... * config/sol2-stubs.cc: ...here. * config/sol2.c: Moved to... * config/sol2.cc: ...here. * config/sparc/driver-sparc.c: Moved to... * config/sparc/driver-sparc.cc: ...here. * config/sparc/sparc-c.c: Moved to... * config/sparc/sparc-c.cc: ...here. * config/sparc/sparc-d.c: Moved to... * config/sparc/sparc-d.cc: ...here. * config/sparc/sparc.c: Moved to... * config/sparc/sparc.cc: ...here. * config/stormy16/stormy16.c: Moved to... * config/stormy16/stormy16.cc: ...here. * config/tilegx/mul-tables.c: Moved to... * config/tilegx/mul-tables.cc: ...here. * config/tilegx/tilegx-c.c: Moved to... * config/tilegx/tilegx-c.cc: ...here. * config/tilegx/tilegx.c: Moved to... * config/tilegx/tilegx.cc: ...here. * config/tilepro/mul-tables.c: Moved to... * config/tilepro/mul-tables.cc: ...here. * config/tilepro/tilepro-c.c: Moved to... * config/tilepro/tilepro-c.cc: ...here. * config/tilepro/tilepro.c: Moved to... * config/tilepro/tilepro.cc: ...here. * config/v850/v850-c.c: Moved to... * config/v850/v850-c.cc: ...here. * config/v850/v850.c: Moved to... * config/v850/v850.cc: ...here. * config/vax/vax.c: Moved to... * config/vax/vax.cc: ...here. * config/visium/visium.c: Moved to... * config/visium/visium.cc: ...here. * config/vms/vms-c.c: Moved to... * config/vms/vms-c.cc: ...here. * config/vms/vms-f.c: Moved to... * config/vms/vms-f.cc: ...here. * config/vms/vms.c: Moved to... * config/vms/vms.cc: ...here. * config/vxworks-c.c: Moved to... * config/vxworks-c.cc: ...here. * config/vxworks.c: Moved to... * config/vxworks.cc: ...here. * config/winnt-c.c: Moved to... * config/winnt-c.cc: ...here. * config/xtensa/xtensa.c: Moved to... * config/xtensa/xtensa.cc: ...here. * context.c: Moved to... * context.cc: ...here. * convert.c: Moved to... * convert.cc: ...here. * coverage.c: Moved to... * coverage.cc: ...here. * cppbuiltin.c: Moved to... * cppbuiltin.cc: ...here. * cppdefault.c: Moved to... * cppdefault.cc: ...here. * cprop.c: Moved to... * cprop.cc: ...here. * cse.c: Moved to... * cse.cc: ...here. * cselib.c: Moved to... * cselib.cc: ...here. * ctfc.c: Moved to... * ctfc.cc: ...here. * ctfout.c: Moved to... * ctfout.cc: ...here. * data-streamer-in.c: Moved to... * data-streamer-in.cc: ...here. * data-streamer-out.c: Moved to... * data-streamer-out.cc: ...here. * data-streamer.c: Moved to... * data-streamer.cc: ...here. * dbgcnt.c: Moved to... * dbgcnt.cc: ...here. * dbxout.c: Moved to... * dbxout.cc: ...here. * dce.c: Moved to... * dce.cc: ...here. * ddg.c: Moved to... * ddg.cc: ...here. * debug.c: Moved to... * debug.cc: ...here. * df-core.c: Moved to... * df-core.cc: ...here. * df-problems.c: Moved to... * df-problems.cc: ...here. * df-scan.c: Moved to... * df-scan.cc: ...here. * dfp.c: Moved to... * dfp.cc: ...here. * diagnostic-color.c: Moved to... * diagnostic-color.cc: ...here. * diagnostic-show-locus.c: Moved to... * diagnostic-show-locus.cc: ...here. * diagnostic-spec.c: Moved to... * diagnostic-spec.cc: ...here. * diagnostic.c: Moved to... * diagnostic.cc: ...here. * dojump.c: Moved to... * dojump.cc: ...here. * dominance.c: Moved to... * dominance.cc: ...here. * domwalk.c: Moved to... * domwalk.cc: ...here. * double-int.c: Moved to... * double-int.cc: ...here. * dse.c: Moved to... * dse.cc: ...here. * dumpfile.c: Moved to... * dumpfile.cc: ...here. * dwarf2asm.c: Moved to... * dwarf2asm.cc: ...here. * dwarf2cfi.c: Moved to... * dwarf2cfi.cc: ...here. * dwarf2ctf.c: Moved to... * dwarf2ctf.cc: ...here. * dwarf2out.c: Moved to... * dwarf2out.cc: ...here. * early-remat.c: Moved to... * early-remat.cc: ...here. * edit-context.c: Moved to... * edit-context.cc: ...here. * emit-rtl.c: Moved to... * emit-rtl.cc: ...here. * errors.c: Moved to... * errors.cc: ...here. * et-forest.c: Moved to... * et-forest.cc: ...here. * except.c: Moved to... * except.cc: ...here. * explow.c: Moved to... * explow.cc: ...here. * expmed.c: Moved to... * expmed.cc: ...here. * expr.c: Moved to... * expr.cc: ...here. * fibonacci_heap.c: Moved to... * fibonacci_heap.cc: ...here. * file-find.c: Moved to... * file-find.cc: ...here. * file-prefix-map.c: Moved to... * file-prefix-map.cc: ...here. * final.c: Moved to... * final.cc: ...here. * fixed-value.c: Moved to... * fixed-value.cc: ...here. * fold-const-call.c: Moved to... * fold-const-call.cc: ...here. * fold-const.c: Moved to... * fold-const.cc: ...here. * fp-test.c: Moved to... * fp-test.cc: ...here. * function-tests.c: Moved to... * function-tests.cc: ...here. * function.c: Moved to... * function.cc: ...here. * fwprop.c: Moved to... * fwprop.cc: ...here. * gcc-ar.c: Moved to... * gcc-ar.cc: ...here. * gcc-main.c: Moved to... * gcc-main.cc: ...here. * gcc-rich-location.c: Moved to... * gcc-rich-location.cc: ...here. * gcc.c: Moved to... * gcc.cc: ...here. * gcov-dump.c: Moved to... * gcov-dump.cc: ...here. * gcov-io.c: Moved to... * gcov-io.cc: ...here. * gcov-tool.c: Moved to... * gcov-tool.cc: ...here. * gcov.c: Moved to... * gcov.cc: ...here. * gcse-common.c: Moved to... * gcse-common.cc: ...here. * gcse.c: Moved to... * gcse.cc: ...here. * genattr-common.c: Moved to... * genattr-common.cc: ...here. * genattr.c: Moved to... * genattr.cc: ...here. * genattrtab.c: Moved to... * genattrtab.cc: ...here. * genautomata.c: Moved to... * genautomata.cc: ...here. * gencfn-macros.c: Moved to... * gencfn-macros.cc: ...here. * gencheck.c: Moved to... * gencheck.cc: ...here. * genchecksum.c: Moved to... * genchecksum.cc: ...here. * gencodes.c: Moved to... * gencodes.cc: ...here. * genconditions.c: Moved to... * genconditions.cc: ...here. * genconfig.c: Moved to... * genconfig.cc: ...here. * genconstants.c: Moved to... * genconstants.cc: ...here. * genemit.c: Moved to... * genemit.cc: ...here. * genenums.c: Moved to... * genenums.cc: ...here. * generic-match-head.c: Moved to... * generic-match-head.cc: ...here. * genextract.c: Moved to... * genextract.cc: ...here. * genflags.c: Moved to... * genflags.cc: ...here. * gengenrtl.c: Moved to... * gengenrtl.cc: ...here. * gengtype-parse.c: Moved to... * gengtype-parse.cc: ...here. * gengtype-state.c: Moved to... * gengtype-state.cc: ...here. * gengtype.c: Moved to... * gengtype.cc: ...here. * genhooks.c: Moved to... * genhooks.cc: ...here. * genmatch.c: Moved to... * genmatch.cc: ...here. * genmddeps.c: Moved to... * genmddeps.cc: ...here. * genmddump.c: Moved to... * genmddump.cc: ...here. * genmodes.c: Moved to... * genmodes.cc: ...here. * genopinit.c: Moved to... * genopinit.cc: ...here. * genoutput.c: Moved to... * genoutput.cc: ...here. * genpeep.c: Moved to... * genpeep.cc: ...here. * genpreds.c: Moved to... * genpreds.cc: ...here. * genrecog.c: Moved to... * genrecog.cc: ...here. * gensupport.c: Moved to... * gensupport.cc: ...here. * gentarget-def.c: Moved to... * gentarget-def.cc: ...here. * genversion.c: Moved to... * genversion.cc: ...here. * ggc-common.c: Moved to... * ggc-common.cc: ...here. * ggc-none.c: Moved to... * ggc-none.cc: ...here. * ggc-page.c: Moved to... * ggc-page.cc: ...here. * ggc-tests.c: Moved to... * ggc-tests.cc: ...here. * gimple-builder.c: Moved to... * gimple-builder.cc: ...here. * gimple-expr.c: Moved to... * gimple-expr.cc: ...here. * gimple-fold.c: Moved to... * gimple-fold.cc: ...here. * gimple-iterator.c: Moved to... * gimple-iterator.cc: ...here. * gimple-laddress.c: Moved to... * gimple-laddress.cc: ...here. * gimple-loop-jam.c: Moved to... * gimple-loop-jam.cc: ...here. * gimple-low.c: Moved to... * gimple-low.cc: ...here. * gimple-match-head.c: Moved to... * gimple-match-head.cc: ...here. * gimple-pretty-print.c: Moved to... * gimple-pretty-print.cc: ...here. * gimple-ssa-backprop.c: Moved to... * gimple-ssa-backprop.cc: ...here. * gimple-ssa-evrp-analyze.c: Moved to... * gimple-ssa-evrp-analyze.cc: ...here. * gimple-ssa-evrp.c: Moved to... * gimple-ssa-evrp.cc: ...here. * gimple-ssa-isolate-paths.c: Moved to... * gimple-ssa-isolate-paths.cc: ...here. * gimple-ssa-nonnull-compare.c: Moved to... * gimple-ssa-nonnull-compare.cc: ...here. * gimple-ssa-split-paths.c: Moved to... * gimple-ssa-split-paths.cc: ...here. * gimple-ssa-sprintf.c: Moved to... * gimple-ssa-sprintf.cc: ...here. * gimple-ssa-store-merging.c: Moved to... * gimple-ssa-store-merging.cc: ...here. * gimple-ssa-strength-reduction.c: Moved to... * gimple-ssa-strength-reduction.cc: ...here. * gimple-ssa-warn-alloca.c: Moved to... * gimple-ssa-warn-alloca.cc: ...here. * gimple-ssa-warn-restrict.c: Moved to... * gimple-ssa-warn-restrict.cc: ...here. * gimple-streamer-in.c: Moved to... * gimple-streamer-in.cc: ...here. * gimple-streamer-out.c: Moved to... * gimple-streamer-out.cc: ...here. * gimple-walk.c: Moved to... * gimple-walk.cc: ...here. * gimple-warn-recursion.c: Moved to... * gimple-warn-recursion.cc: ...here. * gimple.c: Moved to... * gimple.cc: ...here. * gimplify-me.c: Moved to... * gimplify-me.cc: ...here. * gimplify.c: Moved to... * gimplify.cc: ...here. * godump.c: Moved to... * godump.cc: ...here. * graph.c: Moved to... * graph.cc: ...here. * graphds.c: Moved to... * graphds.cc: ...here. * graphite-dependences.c: Moved to... * graphite-dependences.cc: ...here. * graphite-isl-ast-to-gimple.c: Moved to... * graphite-isl-ast-to-gimple.cc: ...here. * graphite-optimize-isl.c: Moved to... * graphite-optimize-isl.cc: ...here. * graphite-poly.c: Moved to... * graphite-poly.cc: ...here. * graphite-scop-detection.c: Moved to... * graphite-scop-detection.cc: ...here. * graphite-sese-to-poly.c: Moved to... * graphite-sese-to-poly.cc: ...here. * graphite.c: Moved to... * graphite.cc: ...here. * haifa-sched.c: Moved to... * haifa-sched.cc: ...here. * hash-map-tests.c: Moved to... * hash-map-tests.cc: ...here. * hash-set-tests.c: Moved to... * hash-set-tests.cc: ...here. * hash-table.c: Moved to... * hash-table.cc: ...here. * hooks.c: Moved to... * hooks.cc: ...here. * host-default.c: Moved to... * host-default.cc: ...here. * hw-doloop.c: Moved to... * hw-doloop.cc: ...here. * hwint.c: Moved to... * hwint.cc: ...here. * ifcvt.c: Moved to... * ifcvt.cc: ...here. * inchash.c: Moved to... * inchash.cc: ...here. * incpath.c: Moved to... * incpath.cc: ...here. * init-regs.c: Moved to... * init-regs.cc: ...here. * input.c: Moved to... * input.cc: ...here. * internal-fn.c: Moved to... * internal-fn.cc: ...here. * intl.c: Moved to... * intl.cc: ...here. * ipa-comdats.c: Moved to... * ipa-comdats.cc: ...here. * ipa-cp.c: Moved to... * ipa-cp.cc: ...here. * ipa-devirt.c: Moved to... * ipa-devirt.cc: ...here. * ipa-fnsummary.c: Moved to... * ipa-fnsummary.cc: ...here. * ipa-icf-gimple.c: Moved to... * ipa-icf-gimple.cc: ...here. * ipa-icf.c: Moved to... * ipa-icf.cc: ...here. * ipa-inline-analysis.c: Moved to... * ipa-inline-analysis.cc: ...here. * ipa-inline-transform.c: Moved to... * ipa-inline-transform.cc: ...here. * ipa-inline.c: Moved to... * ipa-inline.cc: ...here. * ipa-modref-tree.c: Moved to... * ipa-modref-tree.cc: ...here. * ipa-modref.c: Moved to... * ipa-modref.cc: ...here. * ipa-param-manipulation.c: Moved to... * ipa-param-manipulation.cc: ...here. * ipa-polymorphic-call.c: Moved to... * ipa-polymorphic-call.cc: ...here. * ipa-predicate.c: Moved to... * ipa-predicate.cc: ...here. * ipa-profile.c: Moved to... * ipa-profile.cc: ...here. * ipa-prop.c: Moved to... * ipa-prop.cc: ...here. * ipa-pure-const.c: Moved to... * ipa-pure-const.cc: ...here. * ipa-ref.c: Moved to... * ipa-ref.cc: ...here. * ipa-reference.c: Moved to... * ipa-reference.cc: ...here. * ipa-split.c: Moved to... * ipa-split.cc: ...here. * ipa-sra.c: Moved to... * ipa-sra.cc: ...here. * ipa-utils.c: Moved to... * ipa-utils.cc: ...here. * ipa-visibility.c: Moved to... * ipa-visibility.cc: ...here. * ipa.c: Moved to... * ipa.cc: ...here. * ira-build.c: Moved to... * ira-build.cc: ...here. * ira-color.c: Moved to... * ira-color.cc: ...here. * ira-conflicts.c: Moved to... * ira-conflicts.cc: ...here. * ira-costs.c: Moved to... * ira-costs.cc: ...here. * ira-emit.c: Moved to... * ira-emit.cc: ...here. * ira-lives.c: Moved to... * ira-lives.cc: ...here. * ira.c: Moved to... * ira.cc: ...here. * jump.c: Moved to... * jump.cc: ...here. * langhooks.c: Moved to... * langhooks.cc: ...here. * lcm.c: Moved to... * lcm.cc: ...here. * lists.c: Moved to... * lists.cc: ...here. * loop-doloop.c: Moved to... * loop-doloop.cc: ...here. * loop-init.c: Moved to... * loop-init.cc: ...here. * loop-invariant.c: Moved to... * loop-invariant.cc: ...here. * loop-iv.c: Moved to... * loop-iv.cc: ...here. * loop-unroll.c: Moved to... * loop-unroll.cc: ...here. * lower-subreg.c: Moved to... * lower-subreg.cc: ...here. * lra-assigns.c: Moved to... * lra-assigns.cc: ...here. * lra-coalesce.c: Moved to... * lra-coalesce.cc: ...here. * lra-constraints.c: Moved to... * lra-constraints.cc: ...here. * lra-eliminations.c: Moved to... * lra-eliminations.cc: ...here. * lra-lives.c: Moved to... * lra-lives.cc: ...here. * lra-remat.c: Moved to... * lra-remat.cc: ...here. * lra-spills.c: Moved to... * lra-spills.cc: ...here. * lra.c: Moved to... * lra.cc: ...here. * lto-cgraph.c: Moved to... * lto-cgraph.cc: ...here. * lto-compress.c: Moved to... * lto-compress.cc: ...here. * lto-opts.c: Moved to... * lto-opts.cc: ...here. * lto-section-in.c: Moved to... * lto-section-in.cc: ...here. * lto-section-out.c: Moved to... * lto-section-out.cc: ...here. * lto-streamer-in.c: Moved to... * lto-streamer-in.cc: ...here. * lto-streamer-out.c: Moved to... * lto-streamer-out.cc: ...here. * lto-streamer.c: Moved to... * lto-streamer.cc: ...here. * lto-wrapper.c: Moved to... * lto-wrapper.cc: ...here. * main.c: Moved to... * main.cc: ...here. * mcf.c: Moved to... * mcf.cc: ...here. * mode-switching.c: Moved to... * mode-switching.cc: ...here. * modulo-sched.c: Moved to... * modulo-sched.cc: ...here. * multiple_target.c: Moved to... * multiple_target.cc: ...here. * omp-expand.c: Moved to... * omp-expand.cc: ...here. * omp-general.c: Moved to... * omp-general.cc: ...here. * omp-low.c: Moved to... * omp-low.cc: ...here. * omp-offload.c: Moved to... * omp-offload.cc: ...here. * omp-simd-clone.c: Moved to... * omp-simd-clone.cc: ...here. * opt-suggestions.c: Moved to... * opt-suggestions.cc: ...here. * optabs-libfuncs.c: Moved to... * optabs-libfuncs.cc: ...here. * optabs-query.c: Moved to... * optabs-query.cc: ...here. * optabs-tree.c: Moved to... * optabs-tree.cc: ...here. * optabs.c: Moved to... * optabs.cc: ...here. * opts-common.c: Moved to... * opts-common.cc: ...here. * opts-global.c: Moved to... * opts-global.cc: ...here. * opts.c: Moved to... * opts.cc: ...here. * passes.c: Moved to... * passes.cc: ...here. * plugin.c: Moved to... * plugin.cc: ...here. * postreload-gcse.c: Moved to... * postreload-gcse.cc: ...here. * postreload.c: Moved to... * postreload.cc: ...here. * predict.c: Moved to... * predict.cc: ...here. * prefix.c: Moved to... * prefix.cc: ...here. * pretty-print.c: Moved to... * pretty-print.cc: ...here. * print-rtl-function.c: Moved to... * print-rtl-function.cc: ...here. * print-rtl.c: Moved to... * print-rtl.cc: ...here. * print-tree.c: Moved to... * print-tree.cc: ...here. * profile-count.c: Moved to... * profile-count.cc: ...here. * profile.c: Moved to... * profile.cc: ...here. * read-md.c: Moved to... * read-md.cc: ...here. * read-rtl-function.c: Moved to... * read-rtl-function.cc: ...here. * read-rtl.c: Moved to... * read-rtl.cc: ...here. * real.c: Moved to... * real.cc: ...here. * realmpfr.c: Moved to... * realmpfr.cc: ...here. * recog.c: Moved to... * recog.cc: ...here. * ree.c: Moved to... * ree.cc: ...here. * reg-stack.c: Moved to... * reg-stack.cc: ...here. * regcprop.c: Moved to... * regcprop.cc: ...here. * reginfo.c: Moved to... * reginfo.cc: ...here. * regrename.c: Moved to... * regrename.cc: ...here. * regstat.c: Moved to... * regstat.cc: ...here. * reload.c: Moved to... * reload.cc: ...here. * reload1.c: Moved to... * reload1.cc: ...here. * reorg.c: Moved to... * reorg.cc: ...here. * resource.c: Moved to... * resource.cc: ...here. * rtl-error.c: Moved to... * rtl-error.cc: ...here. * rtl-tests.c: Moved to... * rtl-tests.cc: ...here. * rtl.c: Moved to... * rtl.cc: ...here. * rtlanal.c: Moved to... * rtlanal.cc: ...here. * rtlhash.c: Moved to... * rtlhash.cc: ...here. * rtlhooks.c: Moved to... * rtlhooks.cc: ...here. * rtx-vector-builder.c: Moved to... * rtx-vector-builder.cc: ...here. * run-rtl-passes.c: Moved to... * run-rtl-passes.cc: ...here. * sancov.c: Moved to... * sancov.cc: ...here. * sanopt.c: Moved to... * sanopt.cc: ...here. * sbitmap.c: Moved to... * sbitmap.cc: ...here. * sched-deps.c: Moved to... * sched-deps.cc: ...here. * sched-ebb.c: Moved to... * sched-ebb.cc: ...here. * sched-rgn.c: Moved to... * sched-rgn.cc: ...here. * sel-sched-dump.c: Moved to... * sel-sched-dump.cc: ...here. * sel-sched-ir.c: Moved to... * sel-sched-ir.cc: ...here. * sel-sched.c: Moved to... * sel-sched.cc: ...here. * selftest-diagnostic.c: Moved to... * selftest-diagnostic.cc: ...here. * selftest-rtl.c: Moved to... * selftest-rtl.cc: ...here. * selftest-run-tests.c: Moved to... * selftest-run-tests.cc: ...here. * selftest.c: Moved to... * selftest.cc: ...here. * sese.c: Moved to... * sese.cc: ...here. * shrink-wrap.c: Moved to... * shrink-wrap.cc: ...here. * simplify-rtx.c: Moved to... * simplify-rtx.cc: ...here. * sparseset.c: Moved to... * sparseset.cc: ...here. * spellcheck-tree.c: Moved to... * spellcheck-tree.cc: ...here. * spellcheck.c: Moved to... * spellcheck.cc: ...here. * sreal.c: Moved to... * sreal.cc: ...here. * stack-ptr-mod.c: Moved to... * stack-ptr-mod.cc: ...here. * statistics.c: Moved to... * statistics.cc: ...here. * stmt.c: Moved to... * stmt.cc: ...here. * stor-layout.c: Moved to... * stor-layout.cc: ...here. * store-motion.c: Moved to... * store-motion.cc: ...here. * streamer-hooks.c: Moved to... * streamer-hooks.cc: ...here. * stringpool.c: Moved to... * stringpool.cc: ...here. * substring-locations.c: Moved to... * substring-locations.cc: ...here. * symtab.c: Moved to... * symtab.cc: ...here. * target-globals.c: Moved to... * target-globals.cc: ...here. * targhooks.c: Moved to... * targhooks.cc: ...here. * timevar.c: Moved to... * timevar.cc: ...here. * toplev.c: Moved to... * toplev.cc: ...here. * tracer.c: Moved to... * tracer.cc: ...here. * trans-mem.c: Moved to... * trans-mem.cc: ...here. * tree-affine.c: Moved to... * tree-affine.cc: ...here. * tree-call-cdce.c: Moved to... * tree-call-cdce.cc: ...here. * tree-cfg.c: Moved to... * tree-cfg.cc: ...here. * tree-cfgcleanup.c: Moved to... * tree-cfgcleanup.cc: ...here. * tree-chrec.c: Moved to... * tree-chrec.cc: ...here. * tree-complex.c: Moved to... * tree-complex.cc: ...here. * tree-data-ref.c: Moved to... * tree-data-ref.cc: ...here. * tree-dfa.c: Moved to... * tree-dfa.cc: ...here. * tree-diagnostic.c: Moved to... * tree-diagnostic.cc: ...here. * tree-dump.c: Moved to... * tree-dump.cc: ...here. * tree-eh.c: Moved to... * tree-eh.cc: ...here. * tree-emutls.c: Moved to... * tree-emutls.cc: ...here. * tree-if-conv.c: Moved to... * tree-if-conv.cc: ...here. * tree-inline.c: Moved to... * tree-inline.cc: ...here. * tree-into-ssa.c: Moved to... * tree-into-ssa.cc: ...here. * tree-iterator.c: Moved to... * tree-iterator.cc: ...here. * tree-loop-distribution.c: Moved to... * tree-loop-distribution.cc: ...here. * tree-nested.c: Moved to... * tree-nested.cc: ...here. * tree-nrv.c: Moved to... * tree-nrv.cc: ...here. * tree-object-size.c: Moved to... * tree-object-size.cc: ...here. * tree-outof-ssa.c: Moved to... * tree-outof-ssa.cc: ...here. * tree-parloops.c: Moved to... * tree-parloops.cc: ...here. * tree-phinodes.c: Moved to... * tree-phinodes.cc: ...here. * tree-predcom.c: Moved to... * tree-predcom.cc: ...here. * tree-pretty-print.c: Moved to... * tree-pretty-print.cc: ...here. * tree-profile.c: Moved to... * tree-profile.cc: ...here. * tree-scalar-evolution.c: Moved to... * tree-scalar-evolution.cc: ...here. * tree-sra.c: Moved to... * tree-sra.cc: ...here. * tree-ssa-address.c: Moved to... * tree-ssa-address.cc: ...here. * tree-ssa-alias.c: Moved to... * tree-ssa-alias.cc: ...here. * tree-ssa-ccp.c: Moved to... * tree-ssa-ccp.cc: ...here. * tree-ssa-coalesce.c: Moved to... * tree-ssa-coalesce.cc: ...here. * tree-ssa-copy.c: Moved to... * tree-ssa-copy.cc: ...here. * tree-ssa-dce.c: Moved to... * tree-ssa-dce.cc: ...here. * tree-ssa-dom.c: Moved to... * tree-ssa-dom.cc: ...here. * tree-ssa-dse.c: Moved to... * tree-ssa-dse.cc: ...here. * tree-ssa-forwprop.c: Moved to... * tree-ssa-forwprop.cc: ...here. * tree-ssa-ifcombine.c: Moved to... * tree-ssa-ifcombine.cc: ...here. * tree-ssa-live.c: Moved to... * tree-ssa-live.cc: ...here. * tree-ssa-loop-ch.c: Moved to... * tree-ssa-loop-ch.cc: ...here. * tree-ssa-loop-im.c: Moved to... * tree-ssa-loop-im.cc: ...here. * tree-ssa-loop-ivcanon.c: Moved to... * tree-ssa-loop-ivcanon.cc: ...here. * tree-ssa-loop-ivopts.c: Moved to... * tree-ssa-loop-ivopts.cc: ...here. * tree-ssa-loop-manip.c: Moved to... * tree-ssa-loop-manip.cc: ...here. * tree-ssa-loop-niter.c: Moved to... * tree-ssa-loop-niter.cc: ...here. * tree-ssa-loop-prefetch.c: Moved to... * tree-ssa-loop-prefetch.cc: ...here. * tree-ssa-loop-split.c: Moved to... * tree-ssa-loop-split.cc: ...here. * tree-ssa-loop-unswitch.c: Moved to... * tree-ssa-loop-unswitch.cc: ...here. * tree-ssa-loop.c: Moved to... * tree-ssa-loop.cc: ...here. * tree-ssa-math-opts.c: Moved to... * tree-ssa-math-opts.cc: ...here. * tree-ssa-operands.c: Moved to... * tree-ssa-operands.cc: ...here. * tree-ssa-phiopt.c: Moved to... * tree-ssa-phiopt.cc: ...here. * tree-ssa-phiprop.c: Moved to... * tree-ssa-phiprop.cc: ...here. * tree-ssa-pre.c: Moved to... * tree-ssa-pre.cc: ...here. * tree-ssa-propagate.c: Moved to... * tree-ssa-propagate.cc: ...here. * tree-ssa-reassoc.c: Moved to... * tree-ssa-reassoc.cc: ...here. * tree-ssa-sccvn.c: Moved to... * tree-ssa-sccvn.cc: ...here. * tree-ssa-scopedtables.c: Moved to... * tree-ssa-scopedtables.cc: ...here. * tree-ssa-sink.c: Moved to... * tree-ssa-sink.cc: ...here. * tree-ssa-strlen.c: Moved to... * tree-ssa-strlen.cc: ...here. * tree-ssa-structalias.c: Moved to... * tree-ssa-structalias.cc: ...here. * tree-ssa-tail-merge.c: Moved to... * tree-ssa-tail-merge.cc: ...here. * tree-ssa-ter.c: Moved to... * tree-ssa-ter.cc: ...here. * tree-ssa-threadbackward.c: Moved to... * tree-ssa-threadbackward.cc: ...here. * tree-ssa-threadedge.c: Moved to... * tree-ssa-threadedge.cc: ...here. * tree-ssa-threadupdate.c: Moved to... * tree-ssa-threadupdate.cc: ...here. * tree-ssa-uncprop.c: Moved to... * tree-ssa-uncprop.cc: ...here. * tree-ssa-uninit.c: Moved to... * tree-ssa-uninit.cc: ...here. * tree-ssa.c: Moved to... * tree-ssa.cc: ...here. * tree-ssanames.c: Moved to... * tree-ssanames.cc: ...here. * tree-stdarg.c: Moved to... * tree-stdarg.cc: ...here. * tree-streamer-in.c: Moved to... * tree-streamer-in.cc: ...here. * tree-streamer-out.c: Moved to... * tree-streamer-out.cc: ...here. * tree-streamer.c: Moved to... * tree-streamer.cc: ...here. * tree-switch-conversion.c: Moved to... * tree-switch-conversion.cc: ...here. * tree-tailcall.c: Moved to... * tree-tailcall.cc: ...here. * tree-vect-data-refs.c: Moved to... * tree-vect-data-refs.cc: ...here. * tree-vect-generic.c: Moved to... * tree-vect-generic.cc: ...here. * tree-vect-loop-manip.c: Moved to... * tree-vect-loop-manip.cc: ...here. * tree-vect-loop.c: Moved to... * tree-vect-loop.cc: ...here. * tree-vect-patterns.c: Moved to... * tree-vect-patterns.cc: ...here. * tree-vect-slp-patterns.c: Moved to... * tree-vect-slp-patterns.cc: ...here. * tree-vect-slp.c: Moved to... * tree-vect-slp.cc: ...here. * tree-vect-stmts.c: Moved to... * tree-vect-stmts.cc: ...here. * tree-vector-builder.c: Moved to... * tree-vector-builder.cc: ...here. * tree-vectorizer.c: Moved to... * tree-vectorizer.cc: ...here. * tree-vrp.c: Moved to... * tree-vrp.cc: ...here. * tree.c: Moved to... * tree.cc: ...here. * tsan.c: Moved to... * tsan.cc: ...here. * typed-splay-tree.c: Moved to... * typed-splay-tree.cc: ...here. * ubsan.c: Moved to... * ubsan.cc: ...here. * valtrack.c: Moved to... * valtrack.cc: ...here. * value-prof.c: Moved to... * value-prof.cc: ...here. * var-tracking.c: Moved to... * var-tracking.cc: ...here. * varasm.c: Moved to... * varasm.cc: ...here. * varpool.c: Moved to... * varpool.cc: ...here. * vec-perm-indices.c: Moved to... * vec-perm-indices.cc: ...here. * vec.c: Moved to... * vec.cc: ...here. * vmsdbgout.c: Moved to... * vmsdbgout.cc: ...here. * vr-values.c: Moved to... * vr-values.cc: ...here. * vtable-verify.c: Moved to... * vtable-verify.cc: ...here. * web.c: Moved to... * web.cc: ...here. * xcoffout.c: Moved to... * xcoffout.cc: ...here. gcc/c-family/ChangeLog: * c-ada-spec.c: Moved to... * c-ada-spec.cc: ...here. * c-attribs.c: Moved to... * c-attribs.cc: ...here. * c-common.c: Moved to... * c-common.cc: ...here. * c-cppbuiltin.c: Moved to... * c-cppbuiltin.cc: ...here. * c-dump.c: Moved to... * c-dump.cc: ...here. * c-format.c: Moved to... * c-format.cc: ...here. * c-gimplify.c: Moved to... * c-gimplify.cc: ...here. * c-indentation.c: Moved to... * c-indentation.cc: ...here. * c-lex.c: Moved to... * c-lex.cc: ...here. * c-omp.c: Moved to... * c-omp.cc: ...here. * c-opts.c: Moved to... * c-opts.cc: ...here. * c-pch.c: Moved to... * c-pch.cc: ...here. * c-ppoutput.c: Moved to... * c-ppoutput.cc: ...here. * c-pragma.c: Moved to... * c-pragma.cc: ...here. * c-pretty-print.c: Moved to... * c-pretty-print.cc: ...here. * c-semantics.c: Moved to... * c-semantics.cc: ...here. * c-ubsan.c: Moved to... * c-ubsan.cc: ...here. * c-warn.c: Moved to... * c-warn.cc: ...here. * cppspec.c: Moved to... * cppspec.cc: ...here. * stub-objc.c: Moved to... * stub-objc.cc: ...here. gcc/c/ChangeLog: * c-aux-info.c: Moved to... * c-aux-info.cc: ...here. * c-convert.c: Moved to... * c-convert.cc: ...here. * c-decl.c: Moved to... * c-decl.cc: ...here. * c-errors.c: Moved to... * c-errors.cc: ...here. * c-fold.c: Moved to... * c-fold.cc: ...here. * c-lang.c: Moved to... * c-lang.cc: ...here. * c-objc-common.c: Moved to... * c-objc-common.cc: ...here. * c-parser.c: Moved to... * c-parser.cc: ...here. * c-typeck.c: Moved to... * c-typeck.cc: ...here. * gccspec.c: Moved to... * gccspec.cc: ...here. * gimple-parser.c: Moved to... * gimple-parser.cc: ...here. gcc/cp/ChangeLog: * call.c: Moved to... * call.cc: ...here. * class.c: Moved to... * class.cc: ...here. * constexpr.c: Moved to... * constexpr.cc: ...here. * cp-gimplify.c: Moved to... * cp-gimplify.cc: ...here. * cp-lang.c: Moved to... * cp-lang.cc: ...here. * cp-objcp-common.c: Moved to... * cp-objcp-common.cc: ...here. * cp-ubsan.c: Moved to... * cp-ubsan.cc: ...here. * cvt.c: Moved to... * cvt.cc: ...here. * cxx-pretty-print.c: Moved to... * cxx-pretty-print.cc: ...here. * decl.c: Moved to... * decl.cc: ...here. * decl2.c: Moved to... * decl2.cc: ...here. * dump.c: Moved to... * dump.cc: ...here. * error.c: Moved to... * error.cc: ...here. * except.c: Moved to... * except.cc: ...here. * expr.c: Moved to... * expr.cc: ...here. * friend.c: Moved to... * friend.cc: ...here. * g++spec.c: Moved to... * g++spec.cc: ...here. * init.c: Moved to... * init.cc: ...here. * lambda.c: Moved to... * lambda.cc: ...here. * lex.c: Moved to... * lex.cc: ...here. * mangle.c: Moved to... * mangle.cc: ...here. * method.c: Moved to... * method.cc: ...here. * name-lookup.c: Moved to... * name-lookup.cc: ...here. * optimize.c: Moved to... * optimize.cc: ...here. * parser.c: Moved to... * parser.cc: ...here. * pt.c: Moved to... * pt.cc: ...here. * ptree.c: Moved to... * ptree.cc: ...here. * rtti.c: Moved to... * rtti.cc: ...here. * search.c: Moved to... * search.cc: ...here. * semantics.c: Moved to... * semantics.cc: ...here. * tree.c: Moved to... * tree.cc: ...here. * typeck.c: Moved to... * typeck.cc: ...here. * typeck2.c: Moved to... * typeck2.cc: ...here. * vtable-class-hierarchy.c: Moved to... * vtable-class-hierarchy.cc: ...here. gcc/fortran/ChangeLog: * arith.c: Moved to... * arith.cc: ...here. * array.c: Moved to... * array.cc: ...here. * bbt.c: Moved to... * bbt.cc: ...here. * check.c: Moved to... * check.cc: ...here. * class.c: Moved to... * class.cc: ...here. * constructor.c: Moved to... * constructor.cc: ...here. * convert.c: Moved to... * convert.cc: ...here. * cpp.c: Moved to... * cpp.cc: ...here. * data.c: Moved to... * data.cc: ...here. * decl.c: Moved to... * decl.cc: ...here. * dependency.c: Moved to... * dependency.cc: ...here. * dump-parse-tree.c: Moved to... * dump-parse-tree.cc: ...here. * error.c: Moved to... * error.cc: ...here. * expr.c: Moved to... * expr.cc: ...here. * f95-lang.c: Moved to... * f95-lang.cc: ...here. * frontend-passes.c: Moved to... * frontend-passes.cc: ...here. * gfortranspec.c: Moved to... * gfortranspec.cc: ...here. * interface.c: Moved to... * interface.cc: ...here. * intrinsic.c: Moved to... * intrinsic.cc: ...here. * io.c: Moved to... * io.cc: ...here. * iresolve.c: Moved to... * iresolve.cc: ...here. * match.c: Moved to... * match.cc: ...here. * matchexp.c: Moved to... * matchexp.cc: ...here. * misc.c: Moved to... * misc.cc: ...here. * module.c: Moved to... * module.cc: ...here. * openmp.c: Moved to... * openmp.cc: ...here. * options.c: Moved to... * options.cc: ...here. * parse.c: Moved to... * parse.cc: ...here. * primary.c: Moved to... * primary.cc: ...here. * resolve.c: Moved to... * resolve.cc: ...here. * scanner.c: Moved to... * scanner.cc: ...here. * simplify.c: Moved to... * simplify.cc: ...here. * st.c: Moved to... * st.cc: ...here. * symbol.c: Moved to... * symbol.cc: ...here. * target-memory.c: Moved to... * target-memory.cc: ...here. * trans-array.c: Moved to... * trans-array.cc: ...here. * trans-common.c: Moved to... * trans-common.cc: ...here. * trans-const.c: Moved to... * trans-const.cc: ...here. * trans-decl.c: Moved to... * trans-decl.cc: ...here. * trans-expr.c: Moved to... * trans-expr.cc: ...here. * trans-intrinsic.c: Moved to... * trans-intrinsic.cc: ...here. * trans-io.c: Moved to... * trans-io.cc: ...here. * trans-openmp.c: Moved to... * trans-openmp.cc: ...here. * trans-stmt.c: Moved to... * trans-stmt.cc: ...here. * trans-types.c: Moved to... * trans-types.cc: ...here. * trans.c: Moved to... * trans.cc: ...here. gcc/go/ChangeLog: * go-backend.c: Moved to... * go-backend.cc: ...here. * go-lang.c: Moved to... * go-lang.cc: ...here. * gospec.c: Moved to... * gospec.cc: ...here. gcc/jit/ChangeLog: * dummy-frontend.c: Moved to... * dummy-frontend.cc: ...here. * jit-builtins.c: Moved to... * jit-builtins.cc: ...here. * jit-logging.c: Moved to... * jit-logging.cc: ...here. * jit-playback.c: Moved to... * jit-playback.cc: ...here. * jit-recording.c: Moved to... * jit-recording.cc: ...here. * jit-result.c: Moved to... * jit-result.cc: ...here. * jit-spec.c: Moved to... * jit-spec.cc: ...here. * jit-tempdir.c: Moved to... * jit-tempdir.cc: ...here. * jit-w32.c: Moved to... * jit-w32.cc: ...here. * libgccjit.c: Moved to... * libgccjit.cc: ...here. gcc/lto/ChangeLog: * common.c: Moved to... * common.cc: ...here. * lto-common.c: Moved to... * lto-common.cc: ...here. * lto-dump.c: Moved to... * lto-dump.cc: ...here. * lto-lang.c: Moved to... * lto-lang.cc: ...here. * lto-object.c: Moved to... * lto-object.cc: ...here. * lto-partition.c: Moved to... * lto-partition.cc: ...here. * lto-symtab.c: Moved to... * lto-symtab.cc: ...here. * lto.c: Moved to... * lto.cc: ...here. gcc/objc/ChangeLog: * objc-act.c: Moved to... * objc-act.cc: ...here. * objc-encoding.c: Moved to... * objc-encoding.cc: ...here. * objc-gnu-runtime-abi-01.c: Moved to... * objc-gnu-runtime-abi-01.cc: ...here. * objc-lang.c: Moved to... * objc-lang.cc: ...here. * objc-map.c: Moved to... * objc-map.cc: ...here. * objc-next-runtime-abi-01.c: Moved to... * objc-next-runtime-abi-01.cc: ...here. * objc-next-runtime-abi-02.c: Moved to... * objc-next-runtime-abi-02.cc: ...here. * objc-runtime-shared-support.c: Moved to... * objc-runtime-shared-support.cc: ...here. gcc/objcp/ChangeLog: * objcp-decl.c: Moved to... * objcp-decl.cc: ...here. * objcp-lang.c: Moved to... * objcp-lang.cc: ...here. libcpp/ChangeLog: * charset.c: Moved to... * charset.cc: ...here. * directives.c: Moved to... * directives.cc: ...here. * errors.c: Moved to... * errors.cc: ...here. * expr.c: Moved to... * expr.cc: ...here. * files.c: Moved to... * files.cc: ...here. * identifiers.c: Moved to... * identifiers.cc: ...here. * init.c: Moved to... * init.cc: ...here. * lex.c: Moved to... * lex.cc: ...here. * line-map.c: Moved to... * line-map.cc: ...here. * macro.c: Moved to... * macro.cc: ...here. * makeucnid.c: Moved to... * makeucnid.cc: ...here. * mkdeps.c: Moved to... * mkdeps.cc: ...here. * pch.c: Moved to... * pch.cc: ...here. * symtab.c: Moved to... * symtab.cc: ...here. * traditional.c: Moved to... * traditional.cc: ...here.
Diffstat (limited to 'gcc/vmsdbgout.c')
-rw-r--r--gcc/vmsdbgout.c1851
1 files changed, 0 insertions, 1851 deletions
diff --git a/gcc/vmsdbgout.c b/gcc/vmsdbgout.c
deleted file mode 100644
index b068bf6..0000000
--- a/gcc/vmsdbgout.c
+++ /dev/null
@@ -1,1851 +0,0 @@
-/* Output VMS debug format symbol table information from GCC.
- Copyright (C) 1987-2022 Free Software Foundation, Inc.
- Contributed by Douglas B. Rupp (rupp@gnat.com).
- Updated by Bernard W. Giroud (bgiroud@users.sourceforge.net).
-
-This file is part of GCC.
-
-GCC is free software; you can redistribute it and/or modify it under
-the terms of the GNU General Public License as published by the Free
-Software Foundation; either version 3, or (at your option) any later
-version.
-
-GCC is distributed in the hope that it will be useful, but WITHOUT ANY
-WARRANTY; without even the implied warranty of MERCHANTABILITY or
-FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
-for more details.
-
-You should have received a copy of the GNU General Public License
-along with GCC; see the file COPYING3. If not see
-<http://www.gnu.org/licenses/>. */
-
-#include "config.h"
-#include "system.h"
-#include "coretypes.h"
-#include "tm.h"
-
-#ifdef VMS_DEBUGGING_INFO
-#include "alias.h"
-#include "tree.h"
-#include "varasm.h"
-#include "version.h"
-#include "flags.h"
-#include "rtl.h"
-#include "output.h"
-#include "vmsdbg.h"
-#include "debug.h"
-#include "langhooks.h"
-#include "function.h"
-#include "target.h"
-#include "file-prefix-map.h" /* remap_debug_filename() */
-
-/* Difference in seconds between the VMS Epoch and the Unix Epoch */
-static const long long vms_epoch_offset = 3506716800ll;
-
-int vms_file_stats_name (const char *, long long *, long *, char *, int *);
-
-/* NOTE: In the comments in this file, many references are made to "Debug
- Symbol Table". This term is abbreviated as `DST' throughout the remainder
- of this file. */
-
-typedef struct dst_line_info_struct *dst_line_info_ref;
-
-/* Each entry in the line_info_table maintains the file and
- line number associated with the label generated for that
- entry. The label gives the PC value associated with
- the line number entry. */
-typedef struct dst_line_info_struct
-{
- unsigned long dst_file_num;
- unsigned long dst_line_num;
-}
-dst_line_info_entry;
-
-typedef struct dst_file_info_struct *dst_file_info_ref;
-
-typedef struct dst_file_info_struct
-{
- char *file_name;
- unsigned int max_line;
- unsigned int listing_line_start;
- long long cdt;
- long ebk;
- short ffb;
- char rfo;
-}
-dst_file_info_entry;
-
-/* Maximum size (in bytes) of an artificially generated label. */
-#define MAX_ARTIFICIAL_LABEL_BYTES 30
-
-/* Make sure we know the sizes of the various types debug can describe. These
- are only defaults. If the sizes are different for your target, you should
- override these values by defining the appropriate symbols in your tm.h
- file. */
-#ifndef PTR_SIZE
-#define PTR_SIZE 4 /* Must be 32 bits for VMS debug info */
-#endif
-
-/* Pointer to a structure of filenames referenced by this compilation unit. */
-static dst_file_info_ref file_info_table;
-
-/* Total number of entries in the table (i.e. array) pointed to by
- `file_info_table'. This is the *total* and includes both used and unused
- slots. */
-static unsigned int file_info_table_allocated;
-
-/* Number of entries in the file_info_table which are actually in use. */
-static unsigned int file_info_table_in_use;
-
-/* Size (in elements) of increments by which we may expand the filename
- table. */
-#define FILE_TABLE_INCREMENT 64
-
-typedef char *char_p;
-
-static vec<char_p> funcnam_table;
-static vec<unsigned> funcnum_table;
-#define FUNC_TABLE_INITIAL 256
-
-/* Local pointer to the name of the main input file. Initialized in
- vmsdbgout_init. */
-static const char *primary_filename;
-
-static char *module_producer;
-static unsigned int module_language;
-
-/* A pointer to the base of a table that contains line information
- for each source code line in .text in the compilation unit. */
-static dst_line_info_ref line_info_table;
-
-/* Number of elements currently allocated for line_info_table. */
-static unsigned int line_info_table_allocated;
-
-/* Number of elements in line_info_table currently in use. */
-static unsigned int line_info_table_in_use;
-
-/* Size (in elements) of increments by which we may expand line_info_table. */
-#define LINE_INFO_TABLE_INCREMENT 1024
-
-/* Forward declarations for functions defined in this file. */
-static char *full_name (const char *);
-static unsigned int lookup_filename (const char *);
-static int write_debug_header (DST_HEADER *, const char *, int);
-static int write_debug_addr (const char *, const char *, int);
-static int write_debug_data1 (unsigned int, const char *, int);
-static int write_debug_data2 (unsigned int, const char *, int);
-static int write_debug_data4 (unsigned long, const char *, int);
-static int write_debug_data8 (unsigned long long, const char *, int);
-static int write_debug_delta4 (const char *, const char *, const char *, int);
-static int write_debug_string (const char *, const char *, int);
-static int write_modbeg (int);
-static int write_modend (int);
-static int write_rtnbeg (int, int);
-static int write_rtnend (int, int);
-static int write_pclines (int);
-static int write_srccorr (int, dst_file_info_entry, int);
-static int write_srccorrs (int);
-
-static void vmsdbgout_init (const char *);
-static void vmsdbgout_finish (const char *);
-static void vmsdbgout_early_finish (const char *);
-static void vmsdbgout_assembly_start (void);
-static void vmsdbgout_define (unsigned int, const char *);
-static void vmsdbgout_undef (unsigned int, const char *);
-static void vmsdbgout_start_source_file (unsigned int, const char *);
-static void vmsdbgout_end_source_file (unsigned int);
-static void vmsdbgout_begin_block (unsigned int, unsigned int);
-static void vmsdbgout_end_block (unsigned int, unsigned int);
-static bool vmsdbgout_ignore_block (const_tree);
-static void vmsdbgout_source_line (unsigned int, unsigned int, const char *,
- int, bool);
-static void vmsdbgout_write_source_line (unsigned, const char *, int , bool);
-static void vmsdbgout_begin_prologue (unsigned int, unsigned int,
- const char *);
-static void vmsdbgout_end_prologue (unsigned int, const char *);
-static void vmsdbgout_end_function (unsigned int);
-static void vmsdbgout_begin_epilogue (unsigned int, const char *);
-static void vmsdbgout_end_epilogue (unsigned int, const char *);
-static void vmsdbgout_begin_function (tree);
-static void vmsdbgout_function_decl (tree);
-static void vmsdbgout_early_global_decl (tree);
-static void vmsdbgout_late_global_decl (tree);
-static void vmsdbgout_type_decl (tree, int);
-static void vmsdbgout_abstract_function (tree);
-
-/* The debug hooks structure. */
-
-const struct gcc_debug_hooks vmsdbg_debug_hooks
-= {vmsdbgout_init,
- vmsdbgout_finish,
- vmsdbgout_early_finish,
- vmsdbgout_assembly_start,
- vmsdbgout_define,
- vmsdbgout_undef,
- vmsdbgout_start_source_file,
- vmsdbgout_end_source_file,
- vmsdbgout_begin_block,
- vmsdbgout_end_block,
- vmsdbgout_ignore_block,
- vmsdbgout_source_line,
- debug_nothing_int_int_charstar, /* set_ignored_loc */
- vmsdbgout_begin_prologue,
- vmsdbgout_end_prologue,
- vmsdbgout_begin_epilogue,
- vmsdbgout_end_epilogue,
- vmsdbgout_begin_function,
- vmsdbgout_end_function,
- debug_nothing_tree, /* register_main_translation_unit */
- vmsdbgout_function_decl,
- vmsdbgout_early_global_decl,
- vmsdbgout_late_global_decl,
- vmsdbgout_type_decl, /* type_decl */
- debug_nothing_tree_tree_tree_bool_bool, /* imported_module_or_decl */
- debug_false_tree_charstarstar_uhwistar, /* die_ref_for_decl */
- debug_nothing_tree_charstar_uhwi, /* register_external_die */
- debug_nothing_tree, /* deferred_inline_function */
- vmsdbgout_abstract_function,
- debug_nothing_rtx_code_label, /* label */
- debug_nothing_int, /* handle_pch */
- debug_nothing_rtx_insn, /* var_location */
- debug_nothing_tree, /* inline_entry */
- debug_nothing_tree, /* size_function */
- debug_nothing_void, /* switch_text_section */
- debug_nothing_tree_tree, /* set_name */
- 0, /* start_end_main_source_file */
- TYPE_SYMTAB_IS_ADDRESS /* tree_type_symtab_field */
-};
-
-/* Definitions of defaults for assembler-dependent names of various
- pseudo-ops and section names. */
-#define VMS_UNALIGNED_SHORT_ASM_OP ".word"
-#define VMS_UNALIGNED_INT_ASM_OP ".long"
-#define VMS_UNALIGNED_LONG_ASM_OP ".long"
-#define VMS_UNALIGNED_DOUBLE_INT_ASM_OP ".quad"
-
-#define VMS_ASM_BYTE_OP ".byte"
-
-#define NUMBYTES(I) ((I) < 256 ? 1 : (I) < 65536 ? 2 : 4)
-
-#define NUMBYTES0(I) ((I) < 128 ? 0 : (I) < 65536 ? 2 : 4)
-
-#ifndef UNALIGNED_PTR_ASM_OP
-#define UNALIGNED_PTR_ASM_OP \
- (PTR_SIZE == 8 ? VMS_UNALIGNED_DOUBLE_INT_ASM_OP : VMS_UNALIGNED_INT_ASM_OP)
-#endif
-
-#ifndef UNALIGNED_OFFSET_ASM_OP
-#define UNALIGNED_OFFSET_ASM_OP(OFFSET) \
- (NUMBYTES (OFFSET) == 4 \
- ? VMS_UNALIGNED_LONG_ASM_OP \
- : (NUMBYTES (OFFSET) == 2 ? VMS_UNALIGNED_SHORT_ASM_OP : VMS_ASM_BYTE_OP))
-#endif
-
-/* Definitions of defaults for formats and names of various special
- (artificial) labels which may be generated within this file (when the -g
- options is used and VMS_DEBUGGING_INFO is in effect. If necessary, these
- may be overridden from within the tm.h file, but typically, overriding these
- defaults is unnecessary. */
-
-static char text_end_label[MAX_ARTIFICIAL_LABEL_BYTES];
-
-#ifndef TEXT_END_LABEL
-#define TEXT_END_LABEL "Lvetext"
-#endif
-#ifndef FUNC_BEGIN_LABEL
-#define FUNC_BEGIN_LABEL "LVFB"
-#endif
-#ifndef FUNC_PROLOG_LABEL
-#define FUNC_PROLOG_LABEL "LVFP"
-#endif
-#ifndef FUNC_EPILOG_LABEL
-#define FUNC_EPILOG_LABEL "LVEB"
-#endif
-#ifndef FUNC_END_LABEL
-#define FUNC_END_LABEL "LVFE"
-#endif
-#ifndef BLOCK_BEGIN_LABEL
-#define BLOCK_BEGIN_LABEL "LVBB"
-#endif
-#ifndef BLOCK_END_LABEL
-#define BLOCK_END_LABEL "LVBE"
-#endif
-#ifndef LINE_CODE_LABEL
-#define LINE_CODE_LABEL "LVM"
-#endif
-
-#ifndef ASM_OUTPUT_DEBUG_DELTA2
-#define ASM_OUTPUT_DEBUG_DELTA2(FILE,LABEL1,LABEL2) \
- do \
- { \
- fprintf ((FILE), "\t%s\t", VMS_UNALIGNED_SHORT_ASM_OP); \
- assemble_name (FILE, LABEL1); \
- fprintf (FILE, "-"); \
- assemble_name (FILE, LABEL2); \
- } \
- while (0)
-#endif
-
-#ifndef ASM_OUTPUT_DEBUG_DELTA4
-#define ASM_OUTPUT_DEBUG_DELTA4(FILE,LABEL1,LABEL2) \
- do \
- { \
- fprintf ((FILE), "\t%s\t", VMS_UNALIGNED_INT_ASM_OP); \
- assemble_name (FILE, LABEL1); \
- fprintf (FILE, "-"); \
- assemble_name (FILE, LABEL2); \
- } \
- while (0)
-#endif
-
-#ifndef ASM_OUTPUT_DEBUG_ADDR_DELTA
-#define ASM_OUTPUT_DEBUG_ADDR_DELTA(FILE,LABEL1,LABEL2) \
- do \
- { \
- fprintf ((FILE), "\t%s\t", UNALIGNED_PTR_ASM_OP); \
- assemble_name (FILE, LABEL1); \
- fprintf (FILE, "-"); \
- assemble_name (FILE, LABEL2); \
- } \
- while (0)
-#endif
-
-#ifndef ASM_OUTPUT_DEBUG_ADDR
-#define ASM_OUTPUT_DEBUG_ADDR(FILE,LABEL) \
- do \
- { \
- fprintf ((FILE), "\t%s\t", UNALIGNED_PTR_ASM_OP); \
- assemble_name (FILE, LABEL); \
- } \
- while (0)
-#endif
-
-#ifndef ASM_OUTPUT_DEBUG_ADDR_CONST
-#define ASM_OUTPUT_DEBUG_ADDR_CONST(FILE,ADDR) \
- fprintf ((FILE), "\t%s\t%s", UNALIGNED_PTR_ASM_OP, (ADDR))
-#endif
-
-#ifndef ASM_OUTPUT_DEBUG_DATA1
-#define ASM_OUTPUT_DEBUG_DATA1(FILE,VALUE) \
- fprintf ((FILE), "\t%s\t%#x", VMS_ASM_BYTE_OP, (unsigned char) VALUE)
-#endif
-
-#ifndef ASM_OUTPUT_DEBUG_DATA2
-#define ASM_OUTPUT_DEBUG_DATA2(FILE,VALUE) \
- fprintf ((FILE), "\t%s\t%#x", VMS_UNALIGNED_SHORT_ASM_OP, \
- (unsigned short) VALUE)
-#endif
-
-#ifndef ASM_OUTPUT_DEBUG_DATA4
-#define ASM_OUTPUT_DEBUG_DATA4(FILE,VALUE) \
- fprintf ((FILE), "\t%s\t%#lx", VMS_UNALIGNED_INT_ASM_OP, \
- (unsigned long) VALUE)
-#endif
-
-#ifndef ASM_OUTPUT_DEBUG_DATA
-#define ASM_OUTPUT_DEBUG_DATA(FILE,VALUE) \
- fprintf ((FILE), "\t%s\t%#lx", UNALIGNED_OFFSET_ASM_OP (VALUE), VALUE)
-#endif
-
-#ifndef ASM_OUTPUT_DEBUG_ADDR_DATA
-#define ASM_OUTPUT_DEBUG_ADDR_DATA(FILE,VALUE) \
- fprintf ((FILE), "\t%s\t%#lx", UNALIGNED_PTR_ASM_OP, \
- (unsigned long) VALUE)
-#endif
-
-#ifndef ASM_OUTPUT_DEBUG_DATA8
-#define ASM_OUTPUT_DEBUG_DATA8(FILE,VALUE) \
- fprintf ((FILE), "\t%s\t%#llx", VMS_UNALIGNED_DOUBLE_INT_ASM_OP, \
- (unsigned long long) VALUE)
-#endif
-
-/* This is similar to the default ASM_OUTPUT_ASCII, except that no trailing
- newline is produced. When flag_verbose_asm is asserted, we add commentary
- at the end of the line, so we must avoid output of a newline here. */
-#ifndef ASM_OUTPUT_DEBUG_STRING
-#define ASM_OUTPUT_DEBUG_STRING(FILE,P) \
- do \
- { \
- int slen = strlen (P); \
- const char *p = (P); \
- int i; \
- fprintf (FILE, "\t.ascii \""); \
- for (i = 0; i < slen; i++) \
- { \
- int c = p[i]; \
- if (c == '\"' || c == '\\') \
- putc ('\\', FILE); \
- if (c >= ' ' && c < 0177) \
- putc (c, FILE); \
- else \
- fprintf (FILE, "\\%o", c); \
- } \
- fprintf (FILE, "\""); \
- } \
- while (0)
-#endif
-
-/* Convert a reference to the assembler name of a C-level name. This
- macro has the same effect as ASM_OUTPUT_LABELREF, but copies to
- a string rather than writing to a file. */
-#ifndef ASM_NAME_TO_STRING
-#define ASM_NAME_TO_STRING(STR, NAME) \
- do \
- { \
- if ((NAME)[0] == '*') \
- strcpy (STR, NAME+1); \
- else \
- strcpy (STR, NAME); \
- } \
- while (0)
-#endif
-
-
-/* Output the debug header HEADER. Also output COMMENT if flag_verbose_asm is
- set. Return the header size. Just return the size if DOSIZEONLY is
- nonzero. */
-
-static int
-write_debug_header (DST_HEADER *header, const char *comment, int dosizeonly)
-{
- if (!dosizeonly)
- {
- ASM_OUTPUT_DEBUG_DATA2 (asm_out_file,
- header->dst__header_length.dst_w_length);
-
- if (flag_verbose_asm)
- fprintf (asm_out_file, "\t%s record length", ASM_COMMENT_START);
- fputc ('\n', asm_out_file);
-
- ASM_OUTPUT_DEBUG_DATA2 (asm_out_file,
- header->dst__header_type.dst_w_type);
-
- if (flag_verbose_asm)
- fprintf (asm_out_file, "\t%s record type (%s)", ASM_COMMENT_START,
- comment);
-
- fputc ('\n', asm_out_file);
- }
-
- return 4;
-}
-
-/* Output the address of SYMBOL. Also output COMMENT if flag_verbose_asm is
- set. Return the address size. Just return the size if DOSIZEONLY is
- nonzero. */
-
-static int
-write_debug_addr (const char *symbol, const char *comment, int dosizeonly)
-{
- if (!dosizeonly)
- {
- ASM_OUTPUT_DEBUG_ADDR (asm_out_file, symbol);
- if (flag_verbose_asm)
- fprintf (asm_out_file, "\t%s %s", ASM_COMMENT_START, comment);
- fputc ('\n', asm_out_file);
- }
-
- return PTR_SIZE;
-}
-
-/* Output the single byte DATA1. Also output COMMENT if flag_verbose_asm is
- set. Return the data size. Just return the size if DOSIZEONLY is
- nonzero. */
-
-static int
-write_debug_data1 (unsigned int data1, const char *comment, int dosizeonly)
-{
- if (!dosizeonly)
- {
- ASM_OUTPUT_DEBUG_DATA1 (asm_out_file, data1);
- if (flag_verbose_asm)
- fprintf (asm_out_file, "\t%s %s", ASM_COMMENT_START, comment);
- fputc ('\n', asm_out_file);
- }
-
- return 1;
-}
-
-/* Output the single word DATA2. Also output COMMENT if flag_verbose_asm is
- set. Return the data size. Just return the size if DOSIZEONLY is
- nonzero. */
-
-static int
-write_debug_data2 (unsigned int data2, const char *comment, int dosizeonly)
-{
- if (!dosizeonly)
- {
- ASM_OUTPUT_DEBUG_DATA2 (asm_out_file, data2);
- if (flag_verbose_asm)
- fprintf (asm_out_file, "\t%s %s", ASM_COMMENT_START, comment);
- fputc ('\n', asm_out_file);
- }
-
- return 2;
-}
-
-/* Output double word DATA4. Also output COMMENT if flag_verbose_asm is set.
- Return the data size. Just return the size if DOSIZEONLY is nonzero. */
-
-static int
-write_debug_data4 (unsigned long data4, const char *comment, int dosizeonly)
-{
- if (!dosizeonly)
- {
- ASM_OUTPUT_DEBUG_DATA4 (asm_out_file, data4);
- if (flag_verbose_asm)
- fprintf (asm_out_file, "\t%s %s", ASM_COMMENT_START, comment);
- fputc ('\n', asm_out_file);
- }
-
- return 4;
-}
-
-/* Output quad word DATA8. Also output COMMENT if flag_verbose_asm is set.
- Return the data size. Just return the size if DOSIZEONLY is nonzero. */
-
-static int
-write_debug_data8 (unsigned long long data8, const char *comment,
- int dosizeonly)
-{
- if (!dosizeonly)
- {
- ASM_OUTPUT_DEBUG_DATA8 (asm_out_file, data8);
- if (flag_verbose_asm)
- fprintf (asm_out_file, "\t%s %s", ASM_COMMENT_START, comment);
- fputc ('\n', asm_out_file);
- }
-
- return 8;
-}
-
-/* Output the difference between LABEL1 and LABEL2. Also output COMMENT if
- flag_verbose_asm is set. Return the data size. Just return the size if
- DOSIZEONLY is nonzero. */
-
-static int
-write_debug_delta4 (const char *label1, const char *label2,
- const char *comment, int dosizeonly)
-{
- if (!dosizeonly)
- {
- ASM_OUTPUT_DEBUG_DELTA4 (asm_out_file, label1, label2);
- if (flag_verbose_asm)
- fprintf (asm_out_file, "\t%s %s", ASM_COMMENT_START, comment);
- fputc ('\n', asm_out_file);
- }
-
- return 4;
-}
-
-/* Output a character string STRING. Also write COMMENT if flag_verbose_asm is
- set. Return the string length. Just return the length if DOSIZEONLY is
- nonzero. */
-
-static int
-write_debug_string (const char *string, const char *comment, int dosizeonly)
-{
- if (!dosizeonly)
- {
- ASM_OUTPUT_DEBUG_STRING (asm_out_file, string);
- if (flag_verbose_asm)
- fprintf (asm_out_file, "\t%s %s", ASM_COMMENT_START, comment);
- fputc ('\n', asm_out_file);
- }
-
- return strlen (string);
-}
-
-/* Output a module begin header and return the header size. Just return the
- size if DOSIZEONLY is nonzero. */
-
-static int
-write_modbeg (int dosizeonly)
-{
- DST_MODULE_BEGIN modbeg;
- DST_MB_TRLR mb_trlr;
- int i;
- char *module_name, *m;
- int modnamelen;
- int prodnamelen;
- int totsize = 0;
-
- /* Assumes primary filename has Unix syntax file spec. */
- module_name = xstrdup (lbasename (primary_filename));
-
- m = strrchr (module_name, '.');
- if (m)
- *m = 0;
-
- modnamelen = strlen (module_name);
- for (i = 0; i < modnamelen; i++)
- module_name[i] = TOUPPER (module_name[i]);
-
- prodnamelen = strlen (module_producer);
-
- modbeg.dst_a_modbeg_header.dst__header_length.dst_w_length
- = DST_K_MODBEG_SIZE + modnamelen + DST_K_MB_TRLR_SIZE + prodnamelen - 1;
- modbeg.dst_a_modbeg_header.dst__header_type.dst_w_type = DST_K_MODBEG;
- modbeg.dst_b_modbeg_flags.dst_v_modbeg_hide = 0;
- modbeg.dst_b_modbeg_flags.dst_v_modbeg_version = 1;
- modbeg.dst_b_modbeg_flags.dst_v_modbeg_unused = 0;
- modbeg.dst_b_modbeg_unused = 0;
- modbeg.dst_l_modbeg_language = (DST_LANGUAGE) module_language;
- modbeg.dst_w_version_major = DST_K_VERSION_MAJOR;
- modbeg.dst_w_version_minor = DST_K_VERSION_MINOR;
- modbeg.dst_b_modbeg_name = strlen (module_name);
-
- mb_trlr.dst_b_compiler = strlen (module_producer);
-
- totsize += write_debug_header (&modbeg.dst_a_modbeg_header,
- "modbeg", dosizeonly);
- totsize += write_debug_data1 (*((char *) &modbeg.dst_b_modbeg_flags),
- "flags", dosizeonly);
- totsize += write_debug_data1 (modbeg.dst_b_modbeg_unused,
- "unused", dosizeonly);
- totsize += write_debug_data4 (modbeg.dst_l_modbeg_language,
- "language", dosizeonly);
- totsize += write_debug_data2 (modbeg.dst_w_version_major,
- "DST major version", dosizeonly);
- totsize += write_debug_data2 (modbeg.dst_w_version_minor,
- "DST minor version", dosizeonly);
- totsize += write_debug_data1 (modbeg.dst_b_modbeg_name,
- "length of module name", dosizeonly);
- totsize += write_debug_string (module_name, "module name", dosizeonly);
- totsize += write_debug_data1 (mb_trlr.dst_b_compiler,
- "length of compiler name", dosizeonly);
- totsize += write_debug_string (module_producer, "compiler name", dosizeonly);
-
- return totsize;
-}
-
-/* Output a module end trailer and return the trailer size. Just return
- the size if DOSIZEONLY is nonzero. */
-
-static int
-write_modend (int dosizeonly)
-{
- DST_MODULE_END modend;
- int totsize = 0;
-
- modend.dst_a_modend_header.dst__header_length.dst_w_length
- = DST_K_MODEND_SIZE - 1;
- modend.dst_a_modend_header.dst__header_type.dst_w_type = DST_K_MODEND;
-
- totsize += write_debug_header (&modend.dst_a_modend_header, "modend",
- dosizeonly);
-
- return totsize;
-}
-
-/* Output a routine begin header routine RTNNUM and return the header size.
- Just return the size if DOSIZEONLY is nonzero. */
-
-static int
-write_rtnbeg (int rtnnum, int dosizeonly)
-{
- const char *rtnname;
- int rtnnamelen;
- char *rtnentryname;
- int totsize = 0;
- char label[MAX_ARTIFICIAL_LABEL_BYTES];
- DST_ROUTINE_BEGIN rtnbeg;
- DST_PROLOG prolog;
-
- rtnname = funcnam_table[rtnnum];
- rtnnamelen = strlen (rtnname);
- rtnentryname = concat (rtnname, "..en", NULL);
-
- if (!strcmp (rtnname, "main"))
- {
- DST_HEADER header;
- const char *go = "TRANSFER$BREAK$GO";
-
- /* This command isn't documented in DSTRECORDS, so it's made to
- look like what DEC C does */
-
- /* header size - 1st byte + flag byte + STO_LW size
- + string count byte + string length */
- header.dst__header_length.dst_w_length
- = DST_K_DST_HEADER_SIZE - 1 + 1 + 4 + 1 + strlen (go);
- header.dst__header_type.dst_w_type = DST_K_TBG;
-
- totsize += write_debug_header (&header, "transfer", dosizeonly);
-
- /* I think this is a flag byte, but I don't know what this flag means */
- totsize += write_debug_data1 (0x1, "flags ???", dosizeonly);
-
- /* Routine Begin PD Address */
- totsize += write_debug_addr (rtnname, "main procedure descriptor",
- dosizeonly);
- totsize += write_debug_data1 (strlen (go), "length of main_name",
- dosizeonly);
- totsize += write_debug_string (go, "main name", dosizeonly);
- }
-
- /* The header length never includes the length byte. */
- rtnbeg.dst_a_rtnbeg_header.dst__header_length.dst_w_length
- = DST_K_RTNBEG_SIZE + rtnnamelen - 1;
- rtnbeg.dst_a_rtnbeg_header.dst__header_type.dst_w_type = DST_K_RTNBEG;
- rtnbeg.dst_b_rtnbeg_flags.dst_v_rtnbeg_unused = 0;
- rtnbeg.dst_b_rtnbeg_flags.dst_v_rtnbeg_unalloc = 0;
- rtnbeg.dst_b_rtnbeg_flags.dst_v_rtnbeg_prototype = 0;
- rtnbeg.dst_b_rtnbeg_flags.dst_v_rtnbeg_inlined = 0;
- rtnbeg.dst_b_rtnbeg_flags.dst_v_rtnbeg_no_call = 1;
- rtnbeg.dst_b_rtnbeg_name = rtnnamelen;
-
- totsize += write_debug_header (&rtnbeg.dst_a_rtnbeg_header, "rtnbeg",
- dosizeonly);
- totsize += write_debug_data1 (*((char *) &rtnbeg.dst_b_rtnbeg_flags),
- "flags", dosizeonly);
-
- /* Routine Begin Address */
- totsize += write_debug_addr (rtnentryname, "routine entry name", dosizeonly);
-
- /* Routine Begin PD Address */
- totsize += write_debug_addr (rtnname, "routine procedure descriptor",
- dosizeonly);
-
- /* Routine Begin Name */
- totsize += write_debug_data1 (rtnbeg.dst_b_rtnbeg_name,
- "length of routine name", dosizeonly);
-
- totsize += write_debug_string (rtnname, "routine name", dosizeonly);
-
- free (rtnentryname);
-
- if (debug_info_level > DINFO_LEVEL_TERSE)
- {
- prolog.dst_a_prolog_header.dst__header_length.dst_w_length
- = DST_K_PROLOG_SIZE - 1;
- prolog.dst_a_prolog_header.dst__header_type.dst_w_type = DST_K_PROLOG;
-
- totsize += write_debug_header (&prolog.dst_a_prolog_header, "prolog",
- dosizeonly);
-
- ASM_GENERATE_INTERNAL_LABEL
- (label, FUNC_PROLOG_LABEL,
- funcnum_table[rtnnum]);
- totsize += write_debug_addr (label, "prolog breakpoint addr",
- dosizeonly);
- }
-
- return totsize;
-}
-
-/* Output a routine end trailer for routine RTNNUM and return the header size.
- Just return the size if DOSIZEONLY is nonzero. */
-
-static int
-write_rtnend (int rtnnum, int dosizeonly)
-{
- DST_ROUTINE_END rtnend;
- char label1[MAX_ARTIFICIAL_LABEL_BYTES];
- char label2[MAX_ARTIFICIAL_LABEL_BYTES];
- int totsize;
-
- totsize = 0;
-
- rtnend.dst_a_rtnend_header.dst__header_length.dst_w_length
- = DST_K_RTNEND_SIZE - 1;
- rtnend.dst_a_rtnend_header.dst__header_type.dst_w_type = DST_K_RTNEND;
- rtnend.dst_b_rtnend_unused = 0;
- rtnend.dst_l_rtnend_size = 0; /* Calculated below. */
-
- totsize += write_debug_header (&rtnend.dst_a_rtnend_header, "rtnend",
- dosizeonly);
- totsize += write_debug_data1 (rtnend.dst_b_rtnend_unused, "unused",
- dosizeonly);
-
- ASM_GENERATE_INTERNAL_LABEL
- (label1, FUNC_BEGIN_LABEL,
- funcnum_table[rtnnum]);
- ASM_GENERATE_INTERNAL_LABEL
- (label2, FUNC_END_LABEL,
- funcnum_table[rtnnum]);
- totsize += write_debug_delta4 (label2, label1, "routine size", dosizeonly);
-
- return totsize;
-}
-
-#define K_DELTA_PC(I) \
- ((I) < 128 ? -(I) : (I) < 65536 ? DST_K_DELTA_PC_W : DST_K_DELTA_PC_L)
-
-#define K_SET_LINUM(I) \
- ((I) < 256 ? DST_K_SET_LINUM_B \
- : (I) < 65536 ? DST_K_SET_LINUM : DST_K_SET_LINUM_L)
-
-#define K_INCR_LINUM(I) \
- ((I) < 256 ? DST_K_INCR_LINUM \
- : (I) < 65536 ? DST_K_INCR_LINUM_W : DST_K_INCR_LINUM_L)
-
-/* Output the PC to line number correlations and return the size. Just return
- the size if DOSIZEONLY is nonzero */
-
-static int
-write_pclines (int dosizeonly)
-{
- unsigned i;
- int fn;
- int ln, lastln;
- int linestart = 0;
- int max_line;
- DST_LINE_NUM_HEADER line_num;
- DST_PCLINE_COMMANDS pcline;
- char label[MAX_ARTIFICIAL_LABEL_BYTES];
- char lastlabel[MAX_ARTIFICIAL_LABEL_BYTES];
- int totsize = 0;
- char buff[256];
-
- max_line = file_info_table[1].max_line;
- file_info_table[1].listing_line_start = linestart;
- linestart = linestart + ((max_line / 100000) + 1) * 100000;
-
- for (i = 2; i < file_info_table_in_use; i++)
- {
- max_line = file_info_table[i].max_line;
- file_info_table[i].listing_line_start = linestart;
- linestart = linestart + ((max_line / 10000) + 1) * 10000;
- }
-
- /* Set starting address to beginning of text section. */
- line_num.dst_a_line_num_header.dst__header_length.dst_w_length = 8;
- line_num.dst_a_line_num_header.dst__header_type.dst_w_type = DST_K_LINE_NUM;
- pcline.dst_b_pcline_command = DST_K_SET_ABS_PC;
-
- totsize += write_debug_header (&line_num.dst_a_line_num_header,
- "line_num", dosizeonly);
- totsize += write_debug_data1 (pcline.dst_b_pcline_command,
- "line_num (SET ABS PC)", dosizeonly);
-
- if (dosizeonly)
- totsize += 4;
- else
- {
- ASM_OUTPUT_DEBUG_ADDR (asm_out_file, TEXT_SECTION_ASM_OP);
- if (flag_verbose_asm)
- fprintf (asm_out_file, "\t%s line_num", ASM_COMMENT_START);
- fputc ('\n', asm_out_file);
- }
-
- fn = line_info_table[1].dst_file_num;
- ln = (file_info_table[fn].listing_line_start
- + line_info_table[1].dst_line_num);
- line_num.dst_a_line_num_header.dst__header_length.dst_w_length = 4 + 4;
- pcline.dst_b_pcline_command = DST_K_SET_LINUM_L;
-
- totsize += write_debug_header (&line_num.dst_a_line_num_header,
- "line_num", dosizeonly);
- totsize += write_debug_data1 (pcline.dst_b_pcline_command,
- "line_num (SET LINUM LONG)", dosizeonly);
-
- sprintf (buff, "line_num (%d)", ln ? ln - 1 : 0);
- totsize += write_debug_data4 (ln ? ln - 1 : 0, buff, dosizeonly);
-
- lastln = ln;
- strcpy (lastlabel, TEXT_SECTION_ASM_OP);
- for (i = 1; i < line_info_table_in_use; i++)
- {
- int extrabytes;
-
- fn = line_info_table[i].dst_file_num;
- ln = (file_info_table[fn].listing_line_start
- + line_info_table[i].dst_line_num);
-
- if (ln - lastln > 1)
- extrabytes = 5; /* NUMBYTES (ln - lastln - 1) + 1; */
- else if (ln <= lastln)
- extrabytes = 5; /* NUMBYTES (ln - 1) + 1; */
- else
- extrabytes = 0;
-
- line_num.dst_a_line_num_header.dst__header_length.dst_w_length
- = 8 + extrabytes;
-
- totsize += write_debug_header
- (&line_num.dst_a_line_num_header, "line_num", dosizeonly);
-
- if (ln - lastln > 1)
- {
- int lndif = ln - lastln - 1;
-
- /* K_INCR_LINUM (lndif); */
- pcline.dst_b_pcline_command = DST_K_INCR_LINUM_L;
-
- totsize += write_debug_data1 (pcline.dst_b_pcline_command,
- "line_num (INCR LINUM LONG)",
- dosizeonly);
-
- sprintf (buff, "line_num (%d)", lndif);
- totsize += write_debug_data4 (lndif, buff, dosizeonly);
- }
- else if (ln <= lastln)
- {
- /* K_SET_LINUM (ln-1); */
- pcline.dst_b_pcline_command = DST_K_SET_LINUM_L;
-
- totsize += write_debug_data1 (pcline.dst_b_pcline_command,
- "line_num (SET LINUM LONG)",
- dosizeonly);
-
- sprintf (buff, "line_num (%d)", ln - 1);
- totsize += write_debug_data4 (ln - 1, buff, dosizeonly);
- }
-
- pcline.dst_b_pcline_command = DST_K_DELTA_PC_L;
-
- totsize += write_debug_data1 (pcline.dst_b_pcline_command,
- "line_num (DELTA PC LONG)", dosizeonly);
-
- ASM_GENERATE_INTERNAL_LABEL (label, LINE_CODE_LABEL, i);
- totsize += write_debug_delta4 (label, lastlabel, "increment line_num",
- dosizeonly);
-
- lastln = ln;
- strcpy (lastlabel, label);
- }
-
- return totsize;
-}
-
-/* Output a source correlation for file FILEID using information saved in
- FILE_INFO_ENTRY and return the size. Just return the size if DOSIZEONLY is
- nonzero. */
-
-static int
-write_srccorr (int fileid, dst_file_info_entry file_info_entry,
- int dosizeonly)
-{
- int src_command_size;
- int linesleft = file_info_entry.max_line;
- int linestart = file_info_entry.listing_line_start;
- int flen = strlen (file_info_entry.file_name);
- int linestodo = 0;
- DST_SOURCE_CORR src_header;
- DST_SRC_COMMAND src_command;
- DST_SRC_COMMAND src_command_sf;
- DST_SRC_COMMAND src_command_sl;
- DST_SRC_COMMAND src_command_sr;
- DST_SRC_COMMAND src_command_dl;
- DST_SRC_CMDTRLR src_cmdtrlr;
- char buff[256];
- int totsize = 0;
-
- if (fileid == 1)
- {
- src_header.dst_a_source_corr_header.dst__header_length.dst_w_length
- = DST_K_SOURCE_CORR_HEADER_SIZE + 1 - 1;
- src_header.dst_a_source_corr_header.dst__header_type.dst_w_type
- = DST_K_SOURCE;
- src_command.dst_b_src_command = DST_K_SRC_FORMFEED;
-
- totsize += write_debug_header (&src_header.dst_a_source_corr_header,
- "source corr", dosizeonly);
-
- totsize += write_debug_data1 (src_command.dst_b_src_command,
- "source_corr (SRC FORMFEED)",
- dosizeonly);
- }
-
- src_command_size
- = DST_K_SRC_COMMAND_SIZE + flen + DST_K_SRC_CMDTRLR_SIZE;
- src_command.dst_b_src_command = DST_K_SRC_DECLFILE;
- src_command.dst_a_src_cmd_fields.dst_a_src_decl_src.dst_b_src_df_length
- = src_command_size - 2;
- src_command.dst_a_src_cmd_fields.dst_a_src_decl_src.dst_b_src_df_flags = 0;
- src_command.dst_a_src_cmd_fields.dst_a_src_decl_src.dst_w_src_df_fileid
- = fileid;
- src_command.dst_a_src_cmd_fields.dst_a_src_decl_src.dst_q_src_df_rms_cdt
- = file_info_entry.cdt;
- src_command.dst_a_src_cmd_fields.dst_a_src_decl_src.dst_l_src_df_rms_ebk
- = file_info_entry.ebk;
- src_command.dst_a_src_cmd_fields.dst_a_src_decl_src.dst_w_src_df_rms_ffb
- = file_info_entry.ffb;
- src_command.dst_a_src_cmd_fields.dst_a_src_decl_src.dst_b_src_df_rms_rfo
- = file_info_entry.rfo;
- src_command.dst_a_src_cmd_fields.dst_a_src_decl_src.dst_b_src_df_filename
- = flen;
-
- src_header.dst_a_source_corr_header.dst__header_length.dst_w_length
- = DST_K_SOURCE_CORR_HEADER_SIZE + src_command_size - 1;
- src_header.dst_a_source_corr_header.dst__header_type.dst_w_type
- = DST_K_SOURCE;
-
- src_cmdtrlr.dst_b_src_df_libmodname = 0;
-
- totsize += write_debug_header (&src_header.dst_a_source_corr_header,
- "source corr", dosizeonly);
- totsize += write_debug_data1 (src_command.dst_b_src_command,
- "source_corr (DECL SRC FILE)", dosizeonly);
- totsize += write_debug_data1
- (src_command.dst_a_src_cmd_fields.dst_a_src_decl_src.dst_b_src_df_length,
- "source_corr (length)", dosizeonly);
-
- totsize += write_debug_data1
- (src_command.dst_a_src_cmd_fields.dst_a_src_decl_src.dst_b_src_df_flags,
- "source_corr (flags)", dosizeonly);
-
- totsize += write_debug_data2
- (src_command.dst_a_src_cmd_fields.dst_a_src_decl_src.dst_w_src_df_fileid,
- "source_corr (fileid)", dosizeonly);
-
- totsize += write_debug_data8
- (src_command.dst_a_src_cmd_fields.dst_a_src_decl_src.dst_q_src_df_rms_cdt,
- "source_corr (creation date)", dosizeonly);
-
- totsize += write_debug_data4
- (src_command.dst_a_src_cmd_fields.dst_a_src_decl_src.dst_l_src_df_rms_ebk,
- "source_corr (EOF block number)", dosizeonly);
-
- totsize += write_debug_data2
- (src_command.dst_a_src_cmd_fields.dst_a_src_decl_src.dst_w_src_df_rms_ffb,
- "source_corr (first free byte)", dosizeonly);
-
- totsize += write_debug_data1
- (src_command.dst_a_src_cmd_fields.dst_a_src_decl_src.dst_b_src_df_rms_rfo,
- "source_corr (record and file organization)", dosizeonly);
-
- totsize += write_debug_data1
- (src_command.dst_a_src_cmd_fields.dst_a_src_decl_src.dst_b_src_df_filename,
- "source_corr (filename length)", dosizeonly);
-
- totsize += write_debug_string (remap_debug_filename (
- file_info_entry.file_name),
- "source file name", dosizeonly);
- totsize += write_debug_data1 (src_cmdtrlr.dst_b_src_df_libmodname,
- "source_corr (libmodname)", dosizeonly);
-
- src_command_sf.dst_b_src_command = DST_K_SRC_SETFILE;
- src_command_sf.dst_a_src_cmd_fields.dst_w_src_unsword = fileid;
-
- src_command_sr.dst_b_src_command = DST_K_SRC_SETREC_W;
- src_command_sr.dst_a_src_cmd_fields.dst_w_src_unsword = 1;
-
- src_command_sl.dst_b_src_command = DST_K_SRC_SETLNUM_L;
- src_command_sl.dst_a_src_cmd_fields.dst_l_src_unslong = linestart + 1;
-
- src_command_dl.dst_b_src_command = DST_K_SRC_DEFLINES_W;
-
- if (linesleft > 65534)
- linesleft = linesleft - 65534, linestodo = 65534;
- else
- linestodo = linesleft, linesleft = 0;
-
- src_command_dl.dst_a_src_cmd_fields.dst_w_src_unsword = linestodo;
-
- src_header.dst_a_source_corr_header.dst__header_length.dst_w_length
- = DST_K_SOURCE_CORR_HEADER_SIZE + 3 + 3 + 5 + 3 - 1;
- src_header.dst_a_source_corr_header.dst__header_type.dst_w_type
- = DST_K_SOURCE;
-
- if (src_command_dl.dst_a_src_cmd_fields.dst_w_src_unsword)
- {
- totsize += write_debug_header (&src_header.dst_a_source_corr_header,
- "source corr", dosizeonly);
-
- totsize += write_debug_data1 (src_command_sf.dst_b_src_command,
- "source_corr (src setfile)", dosizeonly);
-
- totsize += write_debug_data2
- (src_command_sf.dst_a_src_cmd_fields.dst_w_src_unsword,
- "source_corr (fileid)", dosizeonly);
-
- totsize += write_debug_data1 (src_command_sr.dst_b_src_command,
- "source_corr (setrec)", dosizeonly);
-
- totsize += write_debug_data2
- (src_command_sr.dst_a_src_cmd_fields.dst_w_src_unsword,
- "source_corr (recnum)", dosizeonly);
-
- totsize += write_debug_data1 (src_command_sl.dst_b_src_command,
- "source_corr (setlnum)", dosizeonly);
-
- totsize += write_debug_data4
- (src_command_sl.dst_a_src_cmd_fields.dst_l_src_unslong,
- "source_corr (linenum)", dosizeonly);
-
- totsize += write_debug_data1 (src_command_dl.dst_b_src_command,
- "source_corr (deflines)", dosizeonly);
-
- sprintf (buff, "source_corr (%d)",
- src_command_dl.dst_a_src_cmd_fields.dst_w_src_unsword);
- totsize += write_debug_data2
- (src_command_dl.dst_a_src_cmd_fields.dst_w_src_unsword,
- buff, dosizeonly);
-
- while (linesleft > 0)
- {
- src_header.dst_a_source_corr_header.dst__header_length.dst_w_length
- = DST_K_SOURCE_CORR_HEADER_SIZE + 3 - 1;
- src_header.dst_a_source_corr_header.dst__header_type.dst_w_type
- = DST_K_SOURCE;
- src_command_dl.dst_b_src_command = DST_K_SRC_DEFLINES_W;
-
- if (linesleft > 65534)
- linesleft = linesleft - 65534, linestodo = 65534;
- else
- linestodo = linesleft, linesleft = 0;
-
- src_command_dl.dst_a_src_cmd_fields.dst_w_src_unsword = linestodo;
-
- totsize += write_debug_header (&src_header.dst_a_source_corr_header,
- "source corr", dosizeonly);
- totsize += write_debug_data1 (src_command_dl.dst_b_src_command,
- "source_corr (deflines)", dosizeonly);
- sprintf (buff, "source_corr (%d)",
- src_command_dl.dst_a_src_cmd_fields.dst_w_src_unsword);
- totsize += write_debug_data2
- (src_command_dl.dst_a_src_cmd_fields.dst_w_src_unsword,
- buff, dosizeonly);
- }
- }
-
- return totsize;
-}
-
-/* Output all the source correlation entries and return the size. Just return
- the size if DOSIZEONLY is nonzero. */
-
-static int
-write_srccorrs (int dosizeonly)
-{
- unsigned int i;
- int totsize = 0;
-
- for (i = 1; i < file_info_table_in_use; i++)
- totsize += write_srccorr (i, file_info_table[i], dosizeonly);
-
- return totsize;
-}
-
-/* Output a marker (i.e. a label) for the beginning of a function, before
- the prologue. */
-
-static void
-vmsdbgout_begin_prologue (unsigned int line, unsigned int column,
- const char *file)
-{
- char label[MAX_ARTIFICIAL_LABEL_BYTES];
-
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.begin_prologue) (line, column, file);
-
- if (debug_info_level > DINFO_LEVEL_NONE)
- {
- ASM_GENERATE_INTERNAL_LABEL (label, FUNC_BEGIN_LABEL,
- current_function_funcdef_no);
- ASM_OUTPUT_LABEL (asm_out_file, label);
- }
-}
-
-/* Output a marker (i.e. a label) for the beginning of a function, after
- the prologue. */
-
-static void
-vmsdbgout_end_prologue (unsigned int line, const char *file)
-{
- char label[MAX_ARTIFICIAL_LABEL_BYTES];
-
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.end_prologue) (line, file);
-
- if (debug_info_level > DINFO_LEVEL_TERSE)
- {
- ASM_GENERATE_INTERNAL_LABEL (label, FUNC_PROLOG_LABEL,
- current_function_funcdef_no);
- ASM_OUTPUT_LABEL (asm_out_file, label);
-
- /* VMS PCA expects every PC range to correlate to some line and file. */
- vmsdbgout_write_source_line (line, file, 0, true);
- }
-}
-
-/* No output for VMS debug, but make obligatory call to Dwarf2 debug */
-
-static void
-vmsdbgout_end_function (unsigned int line)
-{
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.end_function) (line);
-}
-
-/* Output a marker (i.e. a label) for the beginning of the epilogue.
- This gets called *before* the epilogue code has been generated. */
-
-static void
-vmsdbgout_begin_epilogue (unsigned int line, const char *file)
-{
- char label[MAX_ARTIFICIAL_LABEL_BYTES];
- static int save_current_function_funcdef_no = -1;
-
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.begin_epilogue) (line, file);
-
- if (debug_info_level > DINFO_LEVEL_NONE)
- {
- if (save_current_function_funcdef_no != current_function_funcdef_no)
- {
- /* Output a label to mark the endpoint of the code generated for this
- function. */
- ASM_GENERATE_INTERNAL_LABEL (label, FUNC_EPILOG_LABEL,
- current_function_funcdef_no);
-
- ASM_OUTPUT_LABEL (asm_out_file, label);
-
- save_current_function_funcdef_no = current_function_funcdef_no;
-
- /* VMS PCA expects every PC range to correlate to some line and
- file. */
- vmsdbgout_write_source_line (line, file, 0, true);
- }
- }
-}
-
-/* Output a marker (i.e. a label) for the absolute end of the generated code
- for a function definition. This gets called *after* the epilogue code has
- been generated. */
-
-static void
-vmsdbgout_end_epilogue (unsigned int line, const char *file)
-{
- char label[MAX_ARTIFICIAL_LABEL_BYTES];
-
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.end_epilogue) (line, file);
-
- if (debug_info_level > DINFO_LEVEL_NONE)
- {
- /* Output a label to mark the endpoint of the code generated for this
- function. */
- ASM_GENERATE_INTERNAL_LABEL (label, FUNC_END_LABEL,
- current_function_funcdef_no);
- ASM_OUTPUT_LABEL (asm_out_file, label);
-
- /* VMS PCA expects every PC range to correlate to some line and file. */
- vmsdbgout_write_source_line (line, file, 0, true);
- }
-}
-
-/* Output a marker (i.e. a label) for the beginning of the generated code for
- a lexical block. */
-
-static void
-vmsdbgout_begin_block (unsigned line, unsigned blocknum)
-{
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.begin_block) (line, blocknum);
-
- if (debug_info_level > DINFO_LEVEL_TERSE)
- targetm.asm_out.internal_label (asm_out_file, BLOCK_BEGIN_LABEL, blocknum);
-}
-
-/* Output a marker (i.e. a label) for the end of the generated code for a
- lexical block. */
-
-static void
-vmsdbgout_end_block (unsigned line, unsigned blocknum)
-{
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.end_block) (line, blocknum);
-
- if (debug_info_level > DINFO_LEVEL_TERSE)
- targetm.asm_out.internal_label (asm_out_file, BLOCK_END_LABEL, blocknum);
-}
-
-/* Not implemented in VMS Debug. */
-
-static bool
-vmsdbgout_ignore_block (const_tree block)
-{
- bool retval = 0;
-
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- retval = (*dwarf2_debug_hooks.ignore_block) (block);
-
- return retval;
-}
-
-/* Add an entry for function DECL into the funcnam_table. */
-
-static void
-vmsdbgout_begin_function (tree decl)
-{
- const char *name = XSTR (XEXP (DECL_RTL (decl), 0), 0);
-
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.begin_function) (decl);
-
- /* Add the new entry to the end of the function name table. */
- funcnam_table.safe_push (xstrdup (name));
- funcnum_table.safe_push (current_function_funcdef_no);
-}
-
-static char fullname_buff [4096];
-
-/* Return the full file specification for FILENAME. The specification must be
- in VMS syntax in order to be processed by VMS Debug. */
-
-static char *
-full_name (const char *filename)
-{
-#ifdef VMS
- FILE *fp = fopen (filename, "r");
-
- fgetname (fp, fullname_buff, 1);
- fclose (fp);
-#else
- /* Unix paths really mess up VMS debug. Better to just output the
- base filename. */
- strcpy (fullname_buff, filename);
-#endif
-
- return fullname_buff;
-}
-
-/* Lookup a filename (in the list of filenames that we know about here in
- vmsdbgout.c) and return its "index". The index of each (known) filename is
- just a unique number which is associated with only that one filename. We
- need such numbers for the sake of generating labels and references
- to those files numbers. If the filename given as an argument is not
- found in our current list, add it to the list and assign it the next
- available unique index number. In order to speed up searches, we remember
- the index of the filename was looked up last. This handles the majority of
- all searches. */
-
-static unsigned int
-lookup_filename (const char *file_name)
-{
- static unsigned int last_file_lookup_index = 0;
- char *fn;
- unsigned i;
- const char *fnam;
- long long cdt = 0;
- long ebk = 0;
- short ffb = 0;
- char rfo = 0;
- long siz = 0;
- int ver = 0;
-
- fnam = full_name (file_name);
-
- /* Check to see if the file name that was searched on the previous call
- matches this file name. If so, return the index. */
- if (last_file_lookup_index != 0)
- {
- fn = file_info_table[last_file_lookup_index].file_name;
- if (strcmp (fnam, fn) == 0)
- return last_file_lookup_index;
- }
-
- /* Didn't match the previous lookup, search the table */
- for (i = 1; i < file_info_table_in_use; ++i)
- {
- fn = file_info_table[i].file_name;
- if (strcmp (fnam, fn) == 0)
- {
- last_file_lookup_index = i;
- return i;
- }
- }
-
- /* Prepare to add a new table entry by making sure there is enough space in
- the table to do so. If not, expand the current table. */
- if (file_info_table_in_use == file_info_table_allocated)
- {
-
- file_info_table_allocated += FILE_TABLE_INCREMENT;
- file_info_table = XRESIZEVEC (dst_file_info_entry, file_info_table,
- file_info_table_allocated);
- }
-
- if (vms_file_stats_name (file_name, &cdt, &siz, &rfo, &ver) == 0)
- {
- ebk = siz / 512 + 1;
- ffb = siz - ((siz / 512) * 512);
- }
-
- /* Add the new entry to the end of the filename table. */
- file_info_table[file_info_table_in_use].file_name = xstrdup (fnam);
- file_info_table[file_info_table_in_use].max_line = 0;
- file_info_table[file_info_table_in_use].cdt = cdt;
- file_info_table[file_info_table_in_use].ebk = ebk;
- file_info_table[file_info_table_in_use].ffb = ffb;
- file_info_table[file_info_table_in_use].rfo = rfo;
-
- last_file_lookup_index = file_info_table_in_use++;
- return last_file_lookup_index;
-}
-
-/* Output a label to mark the beginning of a source code line entry
- and record information relating to this source line, in
- 'line_info_table' for later output of the .debug_line section. */
-
-static void
-vmsdbgout_write_source_line (unsigned line, const char *filename,
- int /* discriminator */, bool /* is_stmt */)
-{
- dst_line_info_ref line_info;
-
- targetm.asm_out.internal_label (asm_out_file, LINE_CODE_LABEL,
- line_info_table_in_use);
-
- /* Expand the line info table if necessary. */
- if (line_info_table_in_use == line_info_table_allocated)
- {
- line_info_table_allocated += LINE_INFO_TABLE_INCREMENT;
- line_info_table = XRESIZEVEC (dst_line_info_entry, line_info_table,
- line_info_table_allocated);
- }
-
- /* Add the new entry at the end of the line_info_table. */
- line_info = &line_info_table[line_info_table_in_use++];
- line_info->dst_file_num = lookup_filename (filename);
- line_info->dst_line_num = line;
- if (line > file_info_table[line_info->dst_file_num].max_line)
- file_info_table[line_info->dst_file_num].max_line = line;
-}
-
-static void
-vmsdbgout_source_line (unsigned line, unsigned int column,
- const char *filename,
- int discriminator, bool is_stmt)
-{
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.source_line) (line, column, filename, discriminator,
- is_stmt);
-
- if (debug_info_level >= DINFO_LEVEL_TERSE)
- vmsdbgout_write_source_line (line, filename, discriminator, is_stmt);
-}
-
-/* Record the beginning of a new source file, for later output.
- At present, unimplemented. */
-
-static void
-vmsdbgout_start_source_file (unsigned int lineno, const char *filename)
-{
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.start_source_file) (lineno, filename);
-}
-
-/* Record the end of a source file, for later output.
- At present, unimplemented. */
-
-static void
-vmsdbgout_end_source_file (unsigned int lineno ATTRIBUTE_UNUSED)
-{
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.end_source_file) (lineno);
-}
-
-/* Set up for Debug output at the start of compilation. */
-
-static void
-vmsdbgout_init (const char *filename)
-{
- const char *language_string = lang_hooks.name;
-
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.init) (filename);
-
- if (debug_info_level == DINFO_LEVEL_NONE)
- return;
-
- /* Remember the name of the primary input file. */
- primary_filename = filename;
-
- /* Allocate the initial hunk of the file_info_table. */
- file_info_table = XCNEWVEC (dst_file_info_entry, FILE_TABLE_INCREMENT);
- file_info_table_allocated = FILE_TABLE_INCREMENT;
- /* Skip the first entry - file numbers begin at 1. */
- file_info_table_in_use = 1;
-
- funcnam_table.create (FUNC_TABLE_INITIAL);
- funcnum_table.create (FUNC_TABLE_INITIAL);
-
- /* Allocate the initial hunk of the line_info_table. */
- line_info_table = XCNEWVEC (dst_line_info_entry, LINE_INFO_TABLE_INCREMENT);
- line_info_table_allocated = LINE_INFO_TABLE_INCREMENT;
- /* zero-th entry is allocated, but unused */
- line_info_table_in_use = 1;
-
- lookup_filename (primary_filename);
-
- if (lang_GNU_C ())
- module_language = DST_K_C;
- else if (lang_GNU_CXX ())
- module_language = DST_K_CXX;
- else if (!strcmp (language_string, "GNU Ada"))
- module_language = DST_K_ADA;
- else if (!strcmp (language_string, "GNU F77"))
- module_language = DST_K_FORTRAN;
- else
- module_language = DST_K_UNKNOWN;
-
- module_producer = concat (language_string, " ", version_string, NULL);
-
- ASM_GENERATE_INTERNAL_LABEL (text_end_label, TEXT_END_LABEL, 0);
-
-}
-
-/* Not implemented in VMS Debug. */
-
-static void
-vmsdbgout_assembly_start (void)
-{
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.assembly_start) ();
-}
-
-/* Not implemented in VMS Debug. */
-
-static void
-vmsdbgout_define (unsigned int lineno, const char *buffer)
-{
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.define) (lineno, buffer);
-}
-
-/* Not implemented in VMS Debug. */
-
-static void
-vmsdbgout_undef (unsigned int lineno, const char *buffer)
-{
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.undef) (lineno, buffer);
-}
-
-/* Not implemented in VMS Debug. */
-
-static void
-vmsdbgout_function_decl (tree decl)
-{
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.function_decl) (decl);
-}
-
-/* Not implemented in VMS Debug. */
-
-static void
-vmsdbgout_early_global_decl (tree decl)
-{
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.early_global_decl) (decl);
-}
-
-/* Not implemented in VMS Debug. */
-
-static void
-vmsdbgout_late_global_decl (tree decl)
-{
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.late_global_decl) (decl);
-}
-
-/* Not implemented in VMS Debug. */
-
-static void
-vmsdbgout_type_decl (tree decl, int local)
-{
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.type_decl) (decl, local);
-}
-
-/* Not implemented in VMS Debug. */
-
-static void
-vmsdbgout_abstract_function (tree decl)
-{
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.outlining_inline_function) (decl);
-}
-
-static void
-vmsdbgout_early_finish (const char *filename)
-{
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.early_finish) (filename);
-}
-
-/* Output stuff that Debug requires at the end of every file and generate the
- VMS Debug debugging info. */
-
-static void
-vmsdbgout_finish (const char *filename ATTRIBUTE_UNUSED)
-{
- unsigned int i, ifunc;
- int totsize;
-
- if (write_symbols == VMS_AND_DWARF2_DEBUG)
- (*dwarf2_debug_hooks.finish) (filename);
-
- if (debug_info_level == DINFO_LEVEL_NONE)
- return;
-
- /* Output a terminator label for the .text section. */
- switch_to_section (text_section);
- targetm.asm_out.internal_label (asm_out_file, TEXT_END_LABEL, 0);
-
- /* Output debugging information.
- Warning! Do not change the name of the .vmsdebug section without
- changing it in the assembler also. */
- switch_to_section (get_named_section (NULL, ".vmsdebug", 0));
- ASM_OUTPUT_ALIGN (asm_out_file, 0);
-
- totsize = write_modbeg (1);
- FOR_EACH_VEC_ELT (funcnum_table, i, ifunc)
- {
- totsize += write_rtnbeg (i, 1);
- totsize += write_rtnend (i, 1);
- }
- totsize += write_pclines (1);
-
- write_modbeg (0);
- FOR_EACH_VEC_ELT (funcnum_table, i, ifunc)
- {
- write_rtnbeg (i, 0);
- write_rtnend (i, 0);
- }
- write_pclines (0);
-
- if (debug_info_level > DINFO_LEVEL_TERSE)
- {
- totsize = write_srccorrs (1);
- write_srccorrs (0);
- }
-
- totsize = write_modend (1);
- write_modend (0);
-}
-
-/* Need for both Dwarf2 on IVMS and VMS Debug on AVMS */
-
-#ifdef VMS
-#define __NEW_STARLET 1
-#include <vms/rms.h>
-#include <vms/atrdef.h>
-#include <vms/fibdef.h>
-#include <vms/stsdef.h>
-#include <vms/iodef.h>
-#include <vms/fatdef.h>
-#include <vms/descrip.h>
-#include <unixlib.h>
-
-#define MAXPATH 256
-
-/* descrip.h doesn't have everything ... */
-typedef struct fibdef* __fibdef_ptr32 __attribute__ (( mode (SI) ));
-struct dsc$descriptor_fib
-{
- unsigned int fib$l_len;
- __fibdef_ptr32 fib$l_addr;
-};
-
-/* I/O Status Block. */
-struct IOSB
-{
- unsigned short status, count;
- unsigned int devdep;
-};
-
-static char *tryfile;
-
-/* Variable length string. */
-struct vstring
-{
- short length;
- char string[NAM$C_MAXRSS+1];
-};
-
-static char filename_buff [MAXPATH];
-static char vms_filespec [MAXPATH];
-
-/* Callback function for filespec style conversion. */
-
-static int
-translate_unix (char *name, int type ATTRIBUTE_UNUSED)
-{
- strncpy (filename_buff, name, MAXPATH);
- filename_buff [MAXPATH - 1] = (char) 0;
- return 0;
-}
-
-/* Wrapper for DECC function that converts a Unix filespec
- to VMS style filespec. */
-
-static char *
-to_vms_file_spec (char *filespec)
-{
- strncpy (vms_filespec, "", MAXPATH);
- decc$to_vms (filespec, translate_unix, 1, 1);
- strncpy (vms_filespec, filename_buff, MAXPATH);
-
- vms_filespec [MAXPATH - 1] = (char) 0;
-
- return vms_filespec;
-}
-
-#else
-#define VMS_EPOCH_OFFSET 35067168000000000LL
-#define VMS_GRANULARITY_FACTOR 10000000
-#endif
-
-/* Return VMS file date, size, format, version given a name. */
-
-int
-vms_file_stats_name (const char *filename, long long *cdt, long *siz, char *rfo,
- int *ver)
-{
-#ifdef VMS
- struct FAB fab;
- struct NAM nam;
-
- unsigned long long create;
- FAT recattr;
- char ascnamebuff [256];
-
- ATRDEF atrlst[]
- = {
- { ATR$S_CREDATE, ATR$C_CREDATE, &create },
- { ATR$S_RECATTR, ATR$C_RECATTR, &recattr },
- { ATR$S_ASCNAME, ATR$C_ASCNAME, &ascnamebuff },
- { 0, 0, 0}
- };
-
- FIBDEF fib;
- struct dsc$descriptor_fib fibdsc = {sizeof (fib), (void *) &fib};
-
- struct IOSB iosb;
-
- long status;
- unsigned short chan;
-
- struct vstring file;
- struct dsc$descriptor_s filedsc
- = {NAM$C_MAXRSS, DSC$K_DTYPE_T, DSC$K_CLASS_S, (void *) file.string};
- struct vstring device;
- struct dsc$descriptor_s devicedsc
- = {NAM$C_MAXRSS, DSC$K_DTYPE_T, DSC$K_CLASS_S, (void *) device.string};
- struct vstring result;
- struct dsc$descriptor_s resultdsc
- = {NAM$C_MAXRSS, DSC$K_DTYPE_VT, DSC$K_CLASS_VS, (void *) result.string};
-
- if (strcmp (filename, "<internal>") == 0
- || strcmp (filename, "<built-in>") == 0)
- {
- if (cdt)
- *cdt = 0;
-
- if (siz)
- *siz = 0;
-
- if (rfo)
- *rfo = 0;
-
- if (ver)
- *ver = 0;
-
- return 0;
- }
-
- tryfile = to_vms_file_spec (filename);
-
- /* Allocate and initialize a FAB and NAM structures. */
- fab = cc$rms_fab;
- nam = cc$rms_nam;
-
- nam.nam$l_esa = file.string;
- nam.nam$b_ess = NAM$C_MAXRSS;
- nam.nam$l_rsa = result.string;
- nam.nam$b_rss = NAM$C_MAXRSS;
- fab.fab$l_fna = tryfile;
- fab.fab$b_fns = strlen (tryfile);
- fab.fab$l_nam = &nam;
-
- /* Validate filespec syntax and device existence. */
- status = SYS$PARSE (&fab, 0, 0);
- if ((status & 1) != 1)
- return 1;
-
- file.string[nam.nam$b_esl] = 0;
-
- /* Find matching filespec. */
- status = SYS$SEARCH (&fab, 0, 0);
- if ((status & 1) != 1)
- return 1;
-
- file.string[nam.nam$b_esl] = 0;
- result.string[result.length=nam.nam$b_rsl] = 0;
-
- /* Get the device name and assign an IO channel. */
- strncpy (device.string, nam.nam$l_dev, nam.nam$b_dev);
- devicedsc.dsc$w_length = nam.nam$b_dev;
- chan = 0;
- status = SYS$ASSIGN (&devicedsc, &chan, 0, 0, 0);
- if ((status & 1) != 1)
- return 1;
-
- /* Initialize the FIB and fill in the directory id field. */
- memset (&fib, 0, sizeof (fib));
- fib.fib$w_did[0] = nam.nam$w_did[0];
- fib.fib$w_did[1] = nam.nam$w_did[1];
- fib.fib$w_did[2] = nam.nam$w_did[2];
- fib.fib$l_acctl = 0;
- fib.fib$l_wcc = 0;
- strcpy (file.string, (strrchr (result.string, ']') + 1));
- filedsc.dsc$w_length = strlen (file.string);
- result.string[result.length = 0] = 0;
-
- /* Open and close the file to fill in the attributes. */
- status
- = SYS$QIOW (0, chan, IO$_ACCESS|IO$M_ACCESS, &iosb, 0, 0,
- &fibdsc, &filedsc, &result.length, &resultdsc, &atrlst, 0);
- if ((status & 1) != 1)
- return 1;
- if ((iosb.status & 1) != 1)
- return 1;
-
- result.string[result.length] = 0;
- status = SYS$QIOW (0, chan, IO$_DEACCESS, &iosb, 0, 0, &fibdsc, 0, 0, 0,
- &atrlst, 0);
- if ((status & 1) != 1)
- return 1;
- if ((iosb.status & 1) != 1)
- return 1;
-
- /* Deassign the channel and exit. */
- status = SYS$DASSGN (chan);
- if ((status & 1) != 1)
- return 1;
-
- if (cdt) *cdt = create;
- if (siz) *siz = (512 * 65536 * recattr.fat$w_efblkh) +
- (512 * (recattr.fat$w_efblkl - 1)) +
- recattr.fat$w_ffbyte;
- if (rfo) *rfo = recattr.fat$v_rtype;
- if (ver) *ver = strtol (strrchr (ascnamebuff, ';')+1, 0, 10);
-
- return 0;
-#else
- struct stat buff;
-
- if ((stat (filename, &buff)) != 0)
- return 1;
-
- if (cdt)
- *cdt = (long long) (buff.st_mtime * VMS_GRANULARITY_FACTOR)
- + VMS_EPOCH_OFFSET;
-
- if (siz)
- *siz = buff.st_size;
-
- if (rfo)
- *rfo = 2; /* Stream LF format */
-
- if (ver)
- *ver = 1;
-
- return 0;
-#endif
-}
-#endif
generated by cgit v1.1 at 2025-09-01 10:18:51 +0000