diff options
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.patch | 32 |
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 @@ -commit f7d8efc630ce45f5d82aae5b2682d261e5541d5f -Author: Andy Wingo <wingo@pobox.com> -Date: Sun Apr 15 13:00:30 2012 -0700 - - disable optimizations in goops dispatch procedures - - * module/oop/goops/dispatch.scm: Disable peval and cse. - -Upstream-Status: Backported - -diff --git a/module/oop/goops/dispatch.scm b/module/oop/goops/dispatch.scm -index e433b86..b12ab15 100644 ---- a/module/oop/goops/dispatch.scm -+++ b/module/oop/goops/dispatch.scm -@@ -1,4 +1,4 @@ --;;;; Copyright (C) 1999, 2000, 2001, 2003, 2006, 2009 Free Software Foundation, Inc. -+;;;; Copyright (C) 1999, 2000, 2001, 2003, 2006, 2009, 2012 Free Software Foundation, Inc. - ;;;; - ;;;; This library is free software; you can redistribute it and/or - ;;;; modify it under the terms of the GNU Lesser General Public -@@ -178,7 +178,9 @@ - '()) - (acons gf gf-sym '())))) - (define (comp exp vals) -- (let ((p ((@ (system base compile) compile) exp #:env *dispatch-module*))) -+ (let ((p ((@ (system base compile) compile) exp -+ #:env *dispatch-module* -+ #:opts '(#:partial-eval? #f #:cse? #f)))) - (apply p vals))) - - ;; kick it. - |