view nt/ftime.bat @ 49223:26622fa0d099

Reworked 2003-01-12 change -- call a plist a plist! (QCplist): Renamed from QCvars. All uses changed. (Fprocess_plist): Replaces Fprocess_variable. Simplified. (Fset_process_plist): Replaces Fset_process_variable. Simplified. (syms_of_process): Intern, staticpro, defsubr these. (Fmake_network_process): Describe :plist arg. Removed :vars arg.
author Kim F. Storm <storm@cua.dk>
date Tue, 14 Jan 2003 09:55:27 +0000
parents 648f23bd7f72
children 695cf19ef79e d7ddb3e565de
line wrap: on
line source

@echo off
if (%1)==() echo Usage: %0 tracefile
if (%1)==() goto done
rem Need to fiddle with the dumped image so prep doesn't break it
obj\i386\preprep ..\src\obj\i386\emacs.exe ..\src\obj\i386\pemacs.exe
copy ..\src\obj\i386\temacs.map ..\src\obj\i386\pemacs.map
rem -----------------------------------------------------------------
rem    Use this version to profile explicit commands only.
prep /om /ft /sf _Fexecute_extended_command ..\src\obj\i386\pemacs
rem -----------------------------------------------------------------
rem    Use this version to ignore startup code
rem prep /om /ft /sf _command_loop_1 ..\src\obj\i386\pemacs
rem -----------------------------------------------------------------
rem    Use this version to include startup code
rem prep /om /ft ..\src\obj\i386\pemacs
rem -----------------------------------------------------------------
if errorlevel 1 goto done
profile ..\src\obj\i386\pemacs %2 %3 %4 %5 %6 %7 %8 %9
if errorlevel 1 goto done
prep /m  ..\src\obj\i386\pemacs
if errorlevel 1 goto done
plist ..\src\obj\i386\pemacs > %1
:done