Original bug ID: 1415
Reporter: administrator
Status: closed
Resolution: fixed
Priority: normal
Severity: minor
Category: ~DO NOT USE (was: OCaml general)

Bug description

A couple weeks ago I sent a patch that included profiling code
generation for SPARC. This patch should be applied along with
that one to fully enable profiling when not using gcc. The Sun
compiler expects "-xpg" instead of "-pg".

*** configure.orig Wed Aug 7 08:45:00 2002
--- configure Tue Oct 1 09:19:21 2002

*** 38,43 ****
--- 38,44 ----
withcurses=yes
withsharedlibs=yes
binutils_dir=''

• cc_profile=-pg
  gcc_warnings="-Wall -Wno-unused"

  Try to turn internationalization off, can cause config.guess to malfunction!

*** 473,478 ****
--- 474,480 ----
byteccrpath="-R"
mksharedlibrpath="-R"
mksharedlib="/usr/ccs/bin/ld -G -o"

•       cc_profile=-xpg
        shared_libraries_supported=true;;
    esac;;
  mips*-*-irix[56]*)
  

*** 1370,1375 ****
--- 1372,1378 ----
echo "DYNLINKOPTS=$dllib" >> Makefile
echo "OTHERLIBRARIES=$otherlibraries" >> Makefile
echo "DEBUGGER=$debugger" >> Makefile

• echo "CC_PROFILE=$cc_profile" >> Makefile

  rm -f tst hasgot.c
  rm -f ../m.h ../s.h ../Makefile
  *** utils/config.mlp.orig Mon Aug 5 10:15:46 2002
  --- utils/config.mlp Sat Sep 28 13:53:58 2002

*** 36,41 ****
--- 36,42 ----
let ranlib = "%%RANLIBCMD%%"
let binutils_nm = "%%BINUTILS_NM%%"
let binutils_objcopy = "%%BINUTILS_OBJCOPY%%"

• let cc_profile = "%%CC_PROFILE%%"

  let exec_magic_number = "Caml1999X007"
  and cmi_magic_number = "Caml1999I009"
  *** Makefile.orig Fri Aug 9 04:07:05 2002
  --- Makefile Sat Sep 28 13:53:25 2002

*** 324,329 ****
--- 324,330 ----
-e 's|%%NATIVECCLIBS%%|$(NATIVECCLIBS)|'
-e 's|%%RANLIBCMD%%|$(RANLIBCMD)|'
-e 's|%%BINUTILS_NM%%|$(BINUTILS_NM)|' \

•         -e 's|%%CC_PROFILE%%|$(CC_PROFILE)|' \
          -e 's|%%BINUTILS_OBJCOPY%%|$(BINUTILS_OBJCOPY)|' \
          -e 's|%%ARCH%%|$(ARCH)|' \
          -e 's|%%MODEL%%|$(MODEL)|' \
  

*** asmcomp/asmlink.ml.orig Mon Jul 22 04:07:26 2002
--- asmcomp/asmlink.ml Sat Sep 28 13:54:27 2002

*** 228,234 ****
if not !Clflags.output_c_object then
Printf.sprintf "%s %s -o %s %s %s %s %s %s %s %s %s"
!Clflags.c_linker
! (if !Clflags.gprofile then "-pg" else "")
(Filename.quote output_name)
(Clflags.std_include_flag "-I")
(String.concat " " (List.rev !Clflags.ccopts))
--- 228,234 ----
if not !Clflags.output_c_object then
Printf.sprintf "%s %s -o %s %s %s %s %s %s %s %s %s"
!Clflags.c_linker
! (if !Clflags.gprofile then Config.cc_profile else "")
(Filename.quote output_name)
(Clflags.std_include_flag "-I")
(String.concat " " (List.rev !Clflags.ccopts))
*** utils/config.mli.orig Tue Jul 23 10:12:02 2002
--- utils/config.mli Sat Sep 28 14:01:16 2002

*** 50,55 ****
--- 50,57 ----
(* The "nm" command from GNU binutils, or "" if not available )
val binutils_objcopy: string
( The "objcopy" command from GNU binutils, or "" if not available *)

• val cc_profile : string

•     (* The command line option to the C compiler to enable profiling. *)
  

  val load_path: string list ref
  (* Directories in the search path for .cmi and .cmo files *)