Delete scm-generics.exp.

Support for smobs as goops classes is changing in guile 2.2.
We may eventually switch to using structs instead of smobs,
so remove any claim we support goops or generics for now.

	* gdb.guile/scm-generics.exp: Delete.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 98b5e4588a91f488c56c1349c595bf59e7765e4c..45f3512f9b18969c464a7cf9e19fa670c8980926 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2014-06-04  Doug Evans  <xdje42@gmail.com>
+
+       * gdb.guile/scm-generics.exp: Delete.
+
 2014-06-04  Doug Evans  <xdje42@gmail.com>
 
        * gdb.guile/scm-breakpoint.exp: Update.

diff --git a/gdb/testsuite/gdb.guile/scm-generics.exp b/gdb/testsuite/gdb.guile/scm-generics.exp
deleted file mode 100644 (file)
index 664affc..0000000
--- a/gdb/testsuite/gdb.guile/scm-generics.exp
+++ /dev/null
@@ -1,42 +0,0 @@
-# Copyright (C) 2010-2014 Free Software Foundation, Inc.
-
-# This program is free software; you can redistribute it and/or modify
-# it under the terms of the GNU General Public License as published by
-# the Free Software Foundation; either version 3 of the License, or
-# (at your option) any later version.
-#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program.  If not, see <http://www.gnu.org/licenses/>.
-
-# This file is part of the GDB testsuite.
-# It tests using GDB smobs with generics.
-
-load_lib gdb-guile.exp
-
-# Start with a fresh gdb.
-gdb_exit
-gdb_start
-
-# Skip all tests if Guile scripting is not enabled.
-if { [skip_guile_tests] } { continue }
-
-gdb_reinitialize_dir $srcdir/$subdir
-
-gdb_install_guile_utils
-gdb_install_guile_module
-
-gdb_test_no_output "guile (use-modules ((oop goops)))"
-
-gdb_test_no_output "guile (define-generic +)"
-gdb_test_no_output "guile (define-method (+ (x <gdb:value>) (y <gdb:value>)) (value-add x y))"
-
-gdb_test_no_output "guile (define x (make-value 42))"
-
-gdb_test_no_output "guile (define y (+ x x))"
-
-gdb_test "guile y" "#<gdb:value 84>"