Mercurial > emacs
view nt/ftime.bat @ 71833:1b88c4bbacbc
(Flength, Felt, Ffillarray): Remove loop around wrong_type_argument.
(Fcopy_sequence, concat): Cleanup wrong_type_argument use.
(concat): Use CHECK_NUMBER.
(Felt): Use CHECK_ARRAY.
(Fsubstring, substring_both): Use CHECK_VECTOR_OR_STRING.
(Fmemq): Use CHECK_LIST.
(Fassq, Fassoc, Frassq, Frassoc): Use CAR.
(assq_no_quit): Use CAR_SAFE.
(Fnthcdr, Fmember, Fdelq, Fdelete, Fnreverse, Fnconc):
Use CHECK_LIST_CONS.
(Freverse, Fplist_get, Flax_plist_get): Use CHECK_LIST_END.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Wed, 12 Jul 2006 13:17:13 +0000 |
parents | 93ce5f375b46 |
children | 375f2633d815 ef719132ddfa |
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 goto skipArchTag arch-tag: d1c629de-9172-4d72-ab68-9d45ab9903cc :skipArchTag