diff options
| author | Max Bolingbroke <batterseapower@hotmail.com> | 2011-05-14 22:34:41 +0100 |
|---|---|---|
| committer | Max Bolingbroke <batterseapower@hotmail.com> | 2011-05-14 22:34:41 +0100 |
| commit | 1a410093862a85b51aa59605af80868eaecd25c4 (patch) | |
| tree | 5f94c74e34b0160452e80464d4d6e3de3ccac0ad /includes/Rts.h | |
| parent | cfbf0eb134efd1c5d9a589f6ae2139d7fad60581 (diff) | |
| download | haskell-1a410093862a85b51aa59605af80868eaecd25c4.tar.gz | |
Unicode fixes, taking into account PEP383 support
Diffstat (limited to 'includes/Rts.h')
| -rw-r--r-- | includes/Rts.h | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/includes/Rts.h b/includes/Rts.h index 51351fab0d..3a6c6f20b9 100644 --- a/includes/Rts.h +++ b/includes/Rts.h @@ -219,6 +219,12 @@ DLL_IMPORT_RTS extern char **prog_argv; /* so we can get at these from Haskell * DLL_IMPORT_RTS extern int prog_argc; DLL_IMPORT_RTS extern char *prog_name; +#ifdef mingw32_HOST_OS +// We need these two from Haskell too +void getWin32ProgArgv(int *argc, wchar_t **argv[]); +void setWin32ProgArgv(int argc, wchar_t *argv[]); +#endif + void stackOverflow(void); void stg_exit(int n) GNU_ATTRIBUTE(__noreturn__); |