Mercurial > projects > ldc
view dmd2/root/man.c @ 1605:1d5721f9ae18
[WIP] Merge DMD r251: bugzilla 111 (appending a dchar to a char[])
This patch needs some work in the code generation, because of the runtime
changes (functions "_d_arrayappendcd" and "_d_arrayappendwd" are added).
This doesn't affect existing code though, it just makes with patch
a little useless, because something like this:
char [] s;
s ~= '\u6211';
That failed to compile with a nice error message previously to this
change, now fails with and ugly error message (a failed assertion).
Apparently there is a regression introduced by this patch too, when
compiling Dil I get this assertion message:
ldc: /home/luca/tesis/ldc/gen/statements.cpp:132: virtual void ReturnStatement::toIR(IRState*): Assertion `p->topfunc()->getReturnType() == llvm::Type::getVoidTy(gIR->context())' failed.
0 ldc 0x08a91628
Thank god we have bisecting capabilities in VCSs now ;)
---
dmd/expression.c | 47 +++++++++++++++++++++++++++++++++++++++++------
1 files changed, 41 insertions(+), 6 deletions(-)
author | Leandro Lucarella <llucax@gmail.com> |
---|---|
date | Wed, 06 Jan 2010 15:18:19 -0300 |
parents | 638d16625da2 |
children |
line wrap: on
line source
// Compiler implementation of the D programming language // Copyright (c) 2008-2009 by Digital Mars // All Rights Reserved // written by Walter Bright // 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. #include <stdio.h> #include <string.h> #include <stdlib.h> #include <assert.h> #if _WIN32 #include <windows.h> #pragma comment(lib,"shell32.lib") void browse(const char *url) { ShellExecute(NULL, "open", url, NULL, NULL, SW_SHOWNORMAL); } #endif #if linux || __FreeBSD__ || __sun&&__SVR4 #include <sys/types.h> #include <sys/wait.h> #include <unistd.h> void browse(const char *url) { pid_t childpid; const char *args[3]; char *browser = getenv("BROWSER"); if (browser) browser = strdup(browser); else browser = "x-www-browser"; args[0] = browser; args[1] = url; args[2] = NULL; childpid = fork(); if (childpid == 0) { execvp(args[0], (char**)args); perror(args[0]); // failed to execute return; } } #endif #if __APPLE__ #include <sys/types.h> #include <sys/wait.h> #include <unistd.h> void browse(const char *url) { pid_t childpid; const char *args[5]; char *browser = getenv("BROWSER"); if (browser) { browser = strdup(browser); args[0] = browser; args[1] = url; args[2] = NULL; } else { //browser = "/Applications/Safari.app/Contents/MacOS/Safari"; args[0] = "open"; args[1] = "-a"; args[2] = "/Applications/Safari.app"; args[3] = url; args[4] = NULL; } childpid = fork(); if (childpid == 0) { execvp(args[0], (char**)args); perror(args[0]); // failed to execute return; } } #endif