Mercurial > projects > ldc
view dmd/hdrgen.c @ 445:cc40db549aea
Changed the handling of variadic intrinsics a bit.
Removed the -fp80 option and made real be 80bit floats on X86, this is what the D spec really says it should be and fixes a bunch of issues.
Changed the handling of parameter attributes to a bit more generalized approach.
Added sext/zext attributes for byte/short/ubyte/ushort parameters, fixes #60 .
Parameter attribs now properly set for intrinsic calls if necessary.
Made the tango.math.Math patch less intrusive.
Fixed/added some mini tests.
author | Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> |
---|---|
date | Fri, 01 Aug 2008 17:59:58 +0200 |
parents | c53b6e3fe49a |
children | f79bbd1d0b27 |
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 #if IN_GCC || IN_LLVM #include "mem.h" #else #if _WIN32 #include "..\root\mem.h" #elif linux #include "../root/mem.h" #else #error "fix this" #endif #endif #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