gcc/make-l2.com

   1 $! Set the def dir to proper place for use in batch. Works for interactive too.
   2 $flnm = f$enviroment("PROCEDURE")     ! get current procedure name
   3 $set default 'f$parse(flnm,,,"DEVICE")''f$parse(flnm,,,"DIRECTORY")'
   4 $!
   5 $! Command file to build libgcc2.olb.  You should only run this once you
   6 $! have the current compiler installed, otherwise some of the builtins will
   7 $! not be recognized.  Once you have built libgcc2.olb, you can merge this
   8 $! with gnu_cc:[000000]gcclib.olb
   9 $!
  10 $if f$extract(0,1,f$trnlnm("GNU_CC_VERSION")).nes."1" then goto compile
  11 $!
  12 $write sys$output "This must be compiled by gcc 2.0"
  13 $exit
  14 $!
  15 $compile:
  16 $lib/create libgcc2.olb
  17 $call compile_libgcc2 "L_muldi3"
  18 $call compile_libgcc2 "L_divdi3"
  19 $call compile_libgcc2 "L_moddi3"
  20 $call compile_libgcc2 "L_udivdi3"
  21 $call compile_libgcc2 "L_umoddi3"
  22 $call compile_libgcc2 "L_negdi2"
  23 $call compile_libgcc2 "L_lshrdi3"
  24 $call compile_libgcc2 "L_lshldi3"
  25 $call compile_libgcc2 "L_ashldi3"
  26 $call compile_libgcc2 "L_ashrdi3"
  27 $call compile_libgcc2 "L_udivmoddi4"
  28 $call compile_libgcc2 "L_cmpdi2"
  29 $call compile_libgcc2 "L_ucmpdi2"
  30 $call compile_libgcc2 "L_floatdidf"
  31 $call compile_libgcc2 "L_floatdisf"
  32 $call compile_libgcc2 "L_fixunsdfsi"
  33 $call compile_libgcc2 "L_fixunssfsi"
  34 $call compile_libgcc2 "L_fixunsdfdi"
  35 $call compile_libgcc2 "L_fixdfdi"
  36 $call compile_libgcc2 "L_fixunssfdi"
  37 $call compile_libgcc2 "L_fixsfdi"
  38 $call compile_libgcc2 "L_varargs"
  39 $call compile_libgcc2 "L_eprintf"
  40 $call compile_libgcc2 "L_builtin_new"
  41 $call compile_libgcc2 "L_builtin_New" L_builtin_nnew
  42 $call compile_libgcc2 "L_builtin_del"
  43 $call compile_libgcc2 "L_bb"
  44 $call compile_libgcc2 "L_shtab"
  45 $call compile_libgcc2 "L_clear_cache"
  46 $call compile_libgcc2 "L_trampoline"
  47 $call compile_libgcc2 "L__main"
  48 $!call compile_libgcc2 "L_exit"
  49 $exit
  50 $!
  51 $compile_libgcc2:
  52 $subroutine
  53 $objname = p1
  54 $if p2.nes."" then objname = p2
  55 $gcc/include=([],[.config])/debug/define="''p1'" libgcc2.c/obj='objname'.obj
  56 $lib libgcc2.olb 'objname'.obj
  57 $del 'objname'.obj;/nolog
  58 $endsubroutine