compiling libgcc2 on openVMS/Alpha

[kkaempf@progis.de (Klaus Kaempf)]

The script to compile libgcc2 on VMS is for VAX/VMS only.

Sat Oct 11 16:26:00 1997  Klaus Kaempf (kkaempf@progis.de)

	* make-l2.com: support openVMS/Alpha

===================================================================
RCS file: RCS/make-l2.com,v
retrieving revision 1.1
diff -c -r1.1 make-l2.com
*** make-l2.com	1997/10/08 13:41:41	1.1
--- make-l2.com	1997/10/08 13:48:15
***************
*** 2,11 ****
  $flnm = f$enviroment("PROCEDURE")     ! get current procedure name
  $set default 'f$parse(flnm,,,"DEVICE")''f$parse(flnm,,,"DIRECTORY")'
  $!
  $! Command file to build libgcc2.olb.  You should only run this once you 
  $! have the current compiler installed, otherwise some of the builtins will
  $! not be recognized.  Once you have built libgcc2.olb, you can merge this
! $! with gnu_cc:[000000]gcclib.olb
  $!
  $! All of the source code is assumed to be in libgcc2.c, and a list of the
  $! modules that we need from there is in libgcc2.list (which is generated
--- 2,14 ----
  $flnm = f$enviroment("PROCEDURE")     ! get current procedure name
  $set default 'f$parse(flnm,,,"DEVICE")''f$parse(flnm,,,"DIRECTORY")'
  $!
+ $ arch_indx = 1 + ((f$getsyi("CPU").ge.128).and.1)      ! vax==1, alpha==2
+ $ arch = f$element(arch_indx,"|","|vax|alpha|")
+ $!
  $! Command file to build libgcc2.olb.  You should only run this once you 
  $! have the current compiler installed, otherwise some of the builtins will
  $! not be recognized.  Once you have built libgcc2.olb, you can merge this
! $! with gnu:[000000]gcclib.olb
  $!
  $! All of the source code is assumed to be in libgcc2.c, and a list of the
  $! modules that we need from there is in libgcc2.list (which is generated
***************
*** 13,50 ****
  $!
  $if f$search("gcc-cc1.exe").eqs.""
  $  then
! $    gcc_cc1:=$gnu_cc:[000000]gcc-cc1
! $    if f$extract(0,1,f$trnlnm("GNU_CC_VERSION")).eqs."1" then goto nocompile
  $  else
  $    gcc_cc1:=$sys$disk:[]gcc-cc1
  $  endif
  $!
  $if f$search("gcc-cpp.exe").eqs.""
  $  then
! $    gcc_cpp:=$gnu_cc:[000000]gcc-cpp
! $    if f$extract(0,1,f$trnlnm("GNU_CC_VERSION")).eqs."1" then goto nocompile
! $    Version:='f$trnlnm("GNU_CC_VERSION")'
  $  else
  $    gcc_cpp:=$sys$disk:[]gcc-cpp
  $    open ifile$ version.opt
  $    read ifile$ line
  $    close ifile$
- $    Version=line-"ident="""-"""
  $  endif
  $!
! $gcc_as:=$gnu_cc:[000000]gcc-as
! $cpp_file:=sys$scratch:gcc_'f$getjpi(0,"pid")'.cpp
! $s_file:=sys$scratch:gcc_'f$getjpi(0,"pid")'.s
  $!
  $set symbol/scope=(nolocal,noglobal)
  $!
- $goto compile
- $!
- $nocompile:
- $write sys$error "You must have gcc version 2 in order to build libgcc2."
- $exit 0
- $!
- $compile:
  $lib/create libgcc2.olb
  $on error then goto c_err
  $on control_y then goto c_err
--- 16,42 ----
  $!
  $if f$search("gcc-cc1.exe").eqs.""
  $  then
! $    gcc-cc1:=$gnu_cc_library:gcc-cc1
  $  else
  $    gcc_cc1:=$sys$disk:[]gcc-cc1
  $  endif
  $!
  $if f$search("gcc-cpp.exe").eqs.""
  $  then
! $    gcc_cpp:=$gnu_cc_library:gcc-cpp
  $  else
  $    gcc_cpp:=$sys$disk:[]gcc-cpp
  $    open ifile$ version.opt
  $    read ifile$ line
  $    close ifile$
  $  endif
  $!
! $ gcc_as:=$gnu_root:[bin]as       
! $ cpp_file:=sys$scratch:gcc_'f$getjpi(0,"pid")'.cpp
! $ s_file:=sys$scratch:gcc_'f$getjpi(0,"pid")'.s
  $!
  $set symbol/scope=(nolocal,noglobal)
  $!
  $lib/create libgcc2.olb
  $on error then goto c_err
  $on control_y then goto c_err
***************
*** 68,84 ****
  $! We do this by hand, since the VMS compiler driver does not have a way
  $! of specifying an alternate location for the compiler executables.
  $!
! $ gcc_cpp "-I[]" "-I[.ginclude]" "-D''flnm'"  libgcc2.c 'cpp_file'
! $ gcc_cc1 'cpp_file' -dumpbase 'objname' -
          -quiet -mgnu -g "-O1" -mvaxc-alignment   -o 's_file'
  $ delete/nolog 'cpp_file';
! $ gcc_as "-vGNU CC  V''Version'" 's_file'  -o 'objname'.OBJ
  $! Assemble again, preserving lowercase symbol names this time.
! $ gcc_as "-vGNU CC  V''Version'" -h3 's_file'  -o 'objname'-c.OBJ
  $ delete/nolog 's_file';
  $!
- $ library libgcc2.olb 'objname'.obj,'objname'-c.obj
- $ delete/nolog 'objname'.obj;,'objname'-c.obj;
  $!
  $goto loop1
  $!
--- 60,89 ----
  $! We do this by hand, since the VMS compiler driver does not have a way
  $! of specifying an alternate location for the compiler executables.
  $!
! $ if arch .eqs. "alpha"
! $ then
! $   gcc_cpp "-D__IEEE_FLOAT" "-I[]" "-I[.config]" "-I[.ginclude]" "-D''flnm'"  libgcc2.c 'cpp_file'
! $   gcc_cc1 'cpp_file' -dumpbase 'objname' -
!         -quiet -mgas "-O1" -mfloat-ieee -o 's_file'
! $ else
! $   gcc_cpp "-I[]" "-I[.config]" "-I[.ginclude]" "-D''flnm'"  libgcc2.c 'cpp_file'
! $   gcc_cc1 'cpp_file' -dumpbase 'objname' -
          -quiet -mgnu -g "-O1" -mvaxc-alignment   -o 's_file'
+ $ endif
  $ delete/nolog 'cpp_file';
! $   gcc_as 's_file'  -o 'objname'.OBJ
! $ if arch .eqs. "vax"
! $ then
  $! Assemble again, preserving lowercase symbol names this time.
! $   gcc_as -h3 's_file'  -o 'objname'-c.OBJ
! $   library libgcc2.olb 'objname'.obj,'objname'-c.obj
! $   delete/nolog 'objname'.obj;,'objname'-c.obj;
! $ else
! $   library libgcc2.olb 'objname'.obj
! $   delete/nolog 'objname'.obj;
! $ endif
  $ delete/nolog 's_file';
  $!
  $!
  $goto loop1
  $!

-- 
proGIS Software                 E-Mail: kkaempf@progis.de
Dipl.-Inform. Klaus K"ampf      Fax:    0241-47067-29
Jakobstr. 117                   Voice:  0241-47067-11
D-52064 Aachen                  WWW:	http://www.progis.de