Mercurial > hg > xemacs-beta
view nt/xpm.mak @ 4716:dca5bb2adff1
Don't cons with #'mapcar calls where the result is discarded,
decide on mapc-internal at compile time if the Common Lisp functionality is
not being used.
2009-10-12 Aidan Kehoe <kehoea@parhasard.net>
* cl-macs.el (mapc):
New compiler macro, use mapc-internal at
compile time if we're not using the Common Lisp functionality.
* bytecomp.el (byte-compile-mapcar, byte-compile-maplist): New.
If the return value of mapcar is being discarded, compile it to a
mapc-internal call instead, and warn, because the programmer
probably can't rely on always being compiled by an XEmacs that
does this. Similarly for maplist and mapl; and use
byte-compile-funarg for map, mapl, mapcan, mapcon.
author | Aidan Kehoe <kehoea@parhasard.net> |
---|---|
date | Mon, 12 Oct 2009 17:19:52 +0100 |
parents | ece8c2170578 |
children | 5274591ce707 |
line wrap: on
line source
# # XPM Makefile for Microsoft NMAKE without X libraries # !if !defined(DEBUG) !if defined(DEBUG_XEMACS) DEBUG=$(DEBUG_XEMACS) !else DEBUG=0 !endif !endif !if !defined(USE_CRTDLL) USE_CRTDLL=1 !endif !if $(DEBUG) OPT=-Od -Zi LINK_DEBUG=-debug !else OPT=-Ox !endif !if $(USE_CRTDLL) !if $(DEBUG) C_LIBFLAG=-MDd !else C_LIBFLAG=-MD !endif !else !if $(DEBUG) C_LIBFLAG=-MLd !else C_LIBFLAG=-ML !endif !endif WARN_CPP_FLAGS = -W3 CC=cl CFLAGS=-nologo -DFOR_MSW $(C_LIBFLAG) $(WARN_CPP_FLAGS) \ $(OPT) $(INCLUDES) -c OBJS= data.obj create.obj misc.obj rgb.obj scan.obj parse.obj hashtab.obj \ WrFFrI.obj RdFToI.obj CrIFrDat.obj CrDatFrI.obj \ CrIFrBuf.obj CrBufFrI.obj \ RdFToDat.obj WrFFrDat.obj \ Attrib.obj Image.obj Info.obj RdFToBuf.obj WrFFrBuf.obj \ simx.obj # nmake rule .SUFFIXES: .SUFFIXES: .c .c.obj:: $(CC) $(CFLAGS) $< # targets all: ..\X11\xpm.h Xpm.lib ..\X11\xpm.h: ..\X11\NUL xpm.h copy xpm.h ..\X11 ..\X11\NUL: mkdir ..\X11 Xpm.lib: $(OBJS) lib -nologo -out:$@ $(OBJS)