summaryrefslogtreecommitdiffstats
path: root/meta/recipes-devtools/guile/files/guile_2.0.5_disable_goops_optimizations.patch
diff options
context:
space:
mode:
Diffstat (limited to 'meta/recipes-devtools/guile/files/guile_2.0.5_disable_goops_optimizations.patch')
-rw-r--r--meta/recipes-devtools/guile/files/guile_2.0.5_disable_goops_optimizations.patch32
1 files changed, 0 insertions, 32 deletions
diff --git a/meta/recipes-devtools/guile/files/guile_2.0.5_disable_goops_optimizations.patch b/meta/recipes-devtools/guile/files/guile_2.0.5_disable_goops_optimizations.patch
deleted file mode 100644
index 8609775310..0000000000
--- a/meta/recipes-devtools/guile/files/guile_2.0.5_disable_goops_optimizations.patch
+++ /dev/null
@@ -1,32 +0,0 @@
1commit f7d8efc630ce45f5d82aae5b2682d261e5541d5f
2Author: Andy Wingo <wingo@pobox.com>
3Date: Sun Apr 15 13:00:30 2012 -0700
4
5 disable optimizations in goops dispatch procedures
6
7 * module/oop/goops/dispatch.scm: Disable peval and cse.
8
9Upstream-Status: Backported
10
11diff --git a/module/oop/goops/dispatch.scm b/module/oop/goops/dispatch.scm
12index e433b86..b12ab15 100644
13--- a/module/oop/goops/dispatch.scm
14+++ b/module/oop/goops/dispatch.scm
15@@ -1,4 +1,4 @@
16-;;;; Copyright (C) 1999, 2000, 2001, 2003, 2006, 2009 Free Software Foundation, Inc.
17+;;;; Copyright (C) 1999, 2000, 2001, 2003, 2006, 2009, 2012 Free Software Foundation, Inc.
18 ;;;;
19 ;;;; This library is free software; you can redistribute it and/or
20 ;;;; modify it under the terms of the GNU Lesser General Public
21@@ -178,7 +178,9 @@
22 '())
23 (acons gf gf-sym '()))))
24 (define (comp exp vals)
25- (let ((p ((@ (system base compile) compile) exp #:env *dispatch-module*)))
26+ (let ((p ((@ (system base compile) compile) exp
27+ #:env *dispatch-module*
28+ #:opts '(#:partial-eval? #f #:cse? #f))))
29 (apply p vals)))
30
31 ;; kick it.
32