91 lines
2.8 KiB
Plaintext
91 lines
2.8 KiB
Plaintext
$! Set the def dir to proper place for use in batch. Works for interactive too.
|
|
$flnm = f$enviroment("PROCEDURE") ! get current procedure name
|
|
$set default 'f$parse(flnm,,,"DEVICE")''f$parse(flnm,,,"DIRECTORY")'
|
|
$!
|
|
$set symbol/scope=(nolocal,noglobal)
|
|
$!
|
|
$! 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
|
|
$!
|
|
$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
|
|
$ else
|
|
$ gcc_cpp:=$sys$disk:[]gcc-cpp
|
|
$ 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
|
|
$goto compile
|
|
$!
|
|
$nocompile:
|
|
$write sys$error "You must have gcc version 2 in order to build libgcc2."
|
|
$exit 0
|
|
$!
|
|
$compile:
|
|
$lib/create libgcc2.olb
|
|
$call compile_libgcc2 "L_muldi3"
|
|
$call compile_libgcc2 "L_divdi3"
|
|
$call compile_libgcc2 "L_moddi3"
|
|
$call compile_libgcc2 "L_udivdi3"
|
|
$call compile_libgcc2 "L_umoddi3"
|
|
$call compile_libgcc2 "L_negdi2"
|
|
$call compile_libgcc2 "L_lshrdi3"
|
|
$call compile_libgcc2 "L_lshldi3"
|
|
$call compile_libgcc2 "L_ashldi3"
|
|
$call compile_libgcc2 "L_ashrdi3"
|
|
$call compile_libgcc2 "L_udivmoddi4"
|
|
$call compile_libgcc2 "L_cmpdi2"
|
|
$call compile_libgcc2 "L_ucmpdi2"
|
|
$call compile_libgcc2 "L_floatdidf"
|
|
$call compile_libgcc2 "L_floatdisf"
|
|
$call compile_libgcc2 "L_fixunsdfsi"
|
|
$call compile_libgcc2 "L_fixunssfsi"
|
|
$call compile_libgcc2 "L_fixunsdfdi"
|
|
$call compile_libgcc2 "L_fixdfdi"
|
|
$call compile_libgcc2 "L_fixunssfdi"
|
|
$call compile_libgcc2 "L_fixsfdi"
|
|
$call compile_libgcc2 "L_varargs"
|
|
$call compile_libgcc2 "L_eprintf"
|
|
$call compile_libgcc2 "L_builtin_new"
|
|
$call compile_libgcc2 "L_builtin_New" L_builtin_nnew
|
|
$call compile_libgcc2 "L_builtin_del"
|
|
$call compile_libgcc2 "L_bb"
|
|
$call compile_libgcc2 "L_shtab"
|
|
$call compile_libgcc2 "L_clear_cache"
|
|
$call compile_libgcc2 "L_trampoline"
|
|
$call compile_libgcc2 "L__main"
|
|
$!call compile_libgcc2 "L_exit"
|
|
$exit
|
|
$!
|
|
$compile_libgcc2:
|
|
$subroutine
|
|
$objname = p1
|
|
$if p2.nes."" then objname = p2
|
|
$!
|
|
$! 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[.CONFIG]" "-D''p1'" LIBGCC2.C 'cpp_file'
|
|
$ gcc_cc1 'cpp_file' -dumpbase LIBGCC2 -
|
|
-quiet -mgnu -g "-O1" -mvaxc-alignment -o 's_file'
|
|
$ delete/nolog 'cpp_file';
|
|
$ gcc_as 's_file' -o 'p1'.OBJ
|
|
$ delete/nolog 's_file';
|
|
$!
|
|
$lib libgcc2.olb 'objname'.obj
|
|
$del 'objname'.obj;/nolog
|
|
$endsubroutine
|