Mercurial > emacs
view nt/ftime.bat @ 51723:635066222916
(ALIGN): Add casts to simplify usage.
(BLOCK_ALIGN, BLOCK_BYTES, ABLOCKS_PADDING, ABLOCKS_SIZE)
(ABLOCKS_BYTES, ABLOCK_ABASE, ABLOCKS_BUSY, ABLOCKS_BASE): New macros.
(struct ablock, struct ablocks): New types.
(free_ablock): New global var.
(lisp_align_malloc, lisp_align_free): New functions.
(FLOAT_BLOCK_SIZE): Redefine in terms of BLOCK_BYTES.
(struct float_block): Reorder and add gcmarkbits.
(GETMARKBIT, SETMARKBIT, UNSETMARKBIT, FLOAT_BLOCK, FLOAT_INDEX)
(FLOAT_MARKED_P, FLOAT_MARK, FLOAT_UNMARK): New macros.
(init_float, make_float): Use lisp_align_malloc.
(free_float, live_float_p): Don't use `type' any more.
(make_float): Use FLOAT_UNMARK to access to mark bit.
(mark_maybe_object, mark_maybe_pointer, survives_gc_p):
Use FLOAT_MARKED_P to access the mark bit.
(pure_alloc): Simplify use of ALIGN.
(mark_object): Use FLOAT_MARK to access the mark bit.
(gc_sweep): Use new macros to access the float's mark bit.
(init_alloc_once): Init free_ablock.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Fri, 04 Jul 2003 20:19:06 +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