diff options
Diffstat (limited to 'dev-lang/mercury-extras/files/mercury-extras-0.13.0_beta-r1-gcc4.patch')
| -rw-r--r-- | dev-lang/mercury-extras/files/mercury-extras-0.13.0_beta-r1-gcc4.patch | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/dev-lang/mercury-extras/files/mercury-extras-0.13.0_beta-r1-gcc4.patch b/dev-lang/mercury-extras/files/mercury-extras-0.13.0_beta-r1-gcc4.patch new file mode 100644 index 000000000000..f06c08ebd27f --- /dev/null +++ b/dev-lang/mercury-extras/files/mercury-extras-0.13.0_beta-r1-gcc4.patch @@ -0,0 +1,36 @@ +diff -ur mercury-extras-0.13.0-beta-2006-04-09.orig/concurrency/global.m mercury-extras-0.13.0-beta-2006-04-09/concurrency/global.m +--- mercury-extras-0.13.0-beta-2006-04-09.orig/concurrency/global.m 2003-03-01 04:20:33.000000000 +1300 ++++ mercury-extras-0.13.0-beta-2006-04-09/concurrency/global.m 2006-04-11 19:42:21.000000000 +1200 +@@ -54,7 +54,7 @@ + :- pragma c_code(global__new(Thing::in, Glob::out, IO0::di, IO::uo), + will_not_call_mercury, "{ + MR_Word *tmp; +- MR_incr_hp((MR_Word) tmp, 1); ++ MR_incr_hp((*(MR_Word*) &(tmp)), 1); + *tmp = Thing; + Glob = (MR_Word) tmp; + IO = IO0; +diff -ur mercury-extras-0.13.0-beta-2006-04-09.orig/curs/curs.m mercury-extras-0.13.0-beta-2006-04-09/curs/curs.m +--- mercury-extras-0.13.0-beta-2006-04-09.orig/curs/curs.m 2005-10-26 18:04:14.000000000 +1300 ++++ mercury-extras-0.13.0-beta-2006-04-09/curs/curs.m 2006-04-11 19:43:19.000000000 +1200 +@@ -965,7 +965,7 @@ + wattrset(w, Attr); + wcolor_set(w, Attr, NULL); + wclear(w); +- (PANEL *)Panel = new_panel(w); ++ (*(PANEL**)&(Panel)) = new_panel(w); + + IO = IO0; + +diff -ur mercury-extras-0.13.0-beta-2006-04-09.orig/graphics/mercury_tcltk/mtcltk.m mercury-extras-0.13.0-beta-2006-04-09/graphics/mercury_tcltk/mtcltk.m +--- mercury-extras-0.13.0-beta-2006-04-09.orig/graphics/mercury_tcltk/mtcltk.m 2005-08-15 16:11:42.000000000 +1200 ++++ mercury-extras-0.13.0-beta-2006-04-09/graphics/mercury_tcltk/mtcltk.m 2006-04-11 19:44:26.000000000 +1200 +@@ -141,7 +141,7 @@ + argc++; + } + +- MR_incr_hp(MR_LVALUE_CAST(MR_Word, argv), argc + 1); ++ MR_incr_hp((*(MR_Word*)&( argv)), argc + 1); + + for (i = 0, l = Args; l != list_empty(); l = list_tail(l), i++) { + argv[i] = (char *) MR_list_head(l); |