gas/config-gas.com

   1 $!
   2 $! This file sets things up to build gas on a VMS system to generate object
   3 $! files for a VMS system.  We do not use the configure script, since we
   4 $! do not have /bin/sh to execute it.
   5 $!
   6 $! If you are running this file, then obviously the host is vax-dec-vms.
   7 $!
   8 $gas_host="vms"
   9 $!
  10 $cpu_type="vax"
  11 $emulation="generic"
  12 $obj_format="vms"
  13 $atof="vax"
  14 $!
  15 $! host specific information
  16 $call link host.h       [.config]ho-'gas_host'.h
  17 $!
  18 $! Target specific information
  19 $call link targ-cpu.c   [.config]tc-'cpu_type'.c
  20 $call link targ-cpu.h   [.config]tc-'cpu_type'.h
  21 $call link targ-env.h   [.config]te-'emulation'.h
  22 $!
  23 $! Code to handle the object file format.
  24 $call link obj-format.h [.config]obj-'obj_format'.h
  25 $call link obj-format.c [.config]obj-'obj_format'.c
  26 $!
  27 $! Code to handle floating point.
  28 $call link atof-targ.c  [.config]atof-'atof'.c
  29 $!
  30 $!
  31 $! Create the file version.opt, which helps identify the executalbe.
  32 $!
  33 $search Makefile.in "VERSION="/match=and/output=t.tmp
  34 $open ifile$ t.tmp
  35 $read ifile$ line
  36 $close ifile$
  37 $delete/nolog t.tmp;*
  38 $! Discard "VERSION=" and "\n" parts.
  39 $ijk=f$locate("=",line)+1
  40 $line=f$extract(ijk,f$length(line)-ijk,line)
  41 $ijk=f$locate("\n",line)
  42 $line=f$extract(0,ijk,line)
  43 $!
  44 $ if f$search("version.opt").nes."" then delete/noconfirm version.opt;*
  45 $open ifile$ version.opt/write
  46 $write ifile$ "ident="+""""+line+""""
  47 $close ifile$
  48 $! Now write config.h.
  49 $ if f$search("config.h").nes."" then delete/noconfirm config.h;*
  50 $open ifile$ config.h/write
  51 $write ifile$ "#define TARGET_CPU       """,cpu_type,"""
  52 $write ifile$ "#define TARGET_ALIAS     ""vms"""
  53 $write ifile$ "#define TARGET_CANONICAL ""vax-dec-vms"""
  54 $write ifile$ "#define GAS_VERSION      """,line,""""
  55 $close ifile$
  56 $!
  57 $ if f$search("config.status") .nes. "" then delete config.status.*
  58 $ open/write file config.status
  59 $ write file "Links are now set up for use with a vax running VMS."
  60 $ close file
  61 $ type config.status
  62 $exit
  63 $!
  64 $!
  65 $link:
  66 $subroutine
  67 $if f$search(p1).nes."" then delete/nolog 'p1';
  68 $copy 'p2' 'p1'
  69 $write sys$output "Linked ''p2' to ''p1'."
  70 $endsubroutine