Mercurial > projects > ldc
view dmd/hdrgen.c @ 1275:bedf0bfb8fdb
Implement first D-specific optimization pass: -simplify-drtcalls.
It uses the machinery of the standard -simplify-libcalls pass, but optimizes
calls to the D runtime instead of calls to C libraries.
At the moment, these optimizations are implemented by this pass:
- Avoid the runtime call for `arr.length = newlen` if it can determine that
the new length isn't longer than the old one.
- Ditto for `cast(T[]) arr` if it will clearly always succeed.
(e.g. if the length of the original array is zero, or if the old element
size is a multiple of the new element size)
author | Frits van Bommel <fvbommel wxs.nl> |
---|---|
date | Tue, 28 Apr 2009 21:58:06 +0200 |
parents | b30fe7e1dbb9 |
children |
line wrap: on
line source
// Compiler implementation of the D programming language // Copyright (c) 1999-2006 by Digital Mars // All Rights Reserved // Initial header generation implementation by Dave Fladebo // http://www.digitalmars.com // License for redistribution is by either the Artistic License // in artistic.txt, or the GNU General Public License in gnu.txt. // See the included readme.txt for details. // Routines to emit header files #ifdef _DH #define PRETTY_PRINT #define TEST_EMIT_ALL 0 // For Testing #define LOG 0 #include <stdio.h> #include <stdlib.h> #include <assert.h> #if __DMC__ #include <complex.h> #endif #include "rmem.h" #include "id.h" #include "init.h" #include "attrib.h" #include "cond.h" #include "enum.h" #include "import.h" #include "module.h" #include "mtype.h" #include "scope.h" #include "staticassert.h" #include "template.h" #include "utf.h" #include "version.h" #include "declaration.h" #include "aggregate.h" #include "expression.h" #include "statement.h" #include "mtype.h" #include "hdrgen.h" void argsToCBuffer(OutBuffer *buf, Array *arguments, HdrGenState *hgs); void Module::genhdrfile() { OutBuffer hdrbufr; hdrbufr.printf("// D import file generated from '%s'", srcfile->toChars()); hdrbufr.writenl(); HdrGenState hgs; memset(&hgs, 0, sizeof(hgs)); hgs.hdrgen = 1; toCBuffer(&hdrbufr, &hgs); // Transfer image to file hdrfile->setbuffer(hdrbufr.data, hdrbufr.offset); hdrbufr.data = NULL; char *pt = FileName::path(hdrfile->toChars()); if (*pt) FileName::ensurePathExists(pt); mem.free(pt); hdrfile->writev(); } void Module::toCBuffer(OutBuffer *buf, HdrGenState *hgs) { if (md) { buf->writestring("module "); buf->writestring(md->toChars()); buf->writebyte(';'); buf->writenl(); } for (int i = 0; i < members->dim; i++) { Dsymbol *s = (Dsymbol *)members->data[i]; s->toHBuffer(buf, hgs); } } void Dsymbol::toHBuffer(OutBuffer *buf, HdrGenState *hgs) { toCBuffer(buf, hgs); } /*************************************/ #endif // #ifdef _DH