1 files changed, 0 insertions, 75 deletions
diff --git a/math/octave-forge-tisean/files/patch-____c1____.cc b/math/octave-forge-tisean/files/patch-____c1____.cc
deleted file mode 100644
index 45d9d0ebf1b1..000000000000
--- a/math/octave-forge-tisean/files/patch-____c1____.cc
+++ /dev/null
@@ -1,75 +0,0 @@
---- __c1__.cc.orig	2015-08-14 22:25:52 UTC
-+++ __c1__.cc
-@@ -34,17 +34,24 @@ FOR INTERNAL USE ONLY"
- #include <octave/f77-fcn.h>
- #include <octave/oct-map.h>
- 
-+#if defined (OCTAVE_HAVE_F77_INT_TYPE)
-+#  define TO_F77_INT(x) octave::to_f77_int (x)
-+#else
-+typedef octave_idx_type F77_INT;
-+#  define TO_F77_INT(x) (x)
-+#endif
-+
- extern "C"
- {
-   F77_RET_T
-   F77_FUNC (d1, D1)
--            (const octave_idx_type& nmax, const octave_idx_type& mmax,
--             const octave_idx_type& nxx, const double *y,
--             const octave_idx_type& delay, const octave_idx_type& m,
--             const octave_idx_type& ncmin, const double& pr,
-+            (const F77_INT& nmax, const F77_INT& mmax,
-+             const F77_INT& nxx, const double *y,
-+             const F77_INT& delay, const F77_INT& m,
-+             const F77_INT& ncmin, const double& pr,
-              double& pln, double& eln, 
--             const octave_idx_type& nmin, const octave_idx_type& kmax,
--             const octave_idx_type& iverb);
-+             const F77_INT& nmin, const F77_INT& kmax,
-+             const F77_INT& iverb);
- 
-   F77_RET_T
-   F77_FUNC (rand, RAND)
-@@ -66,23 +73,23 @@ DEFUN_DLD (__c1__, args, nargout, HELPTE
-     {
-     // Assigning inputs
-       Matrix input           = args(0).matrix_value ();
--      octave_idx_type mindim = args(1).idx_type_value ();
--      octave_idx_type maxdim = args(2).idx_type_value ();
--      octave_idx_type delay  = args(3).idx_type_value ();
--      octave_idx_type tmin   = args(4).idx_type_value ();
--      octave_idx_type cmin   = args(5).idx_type_value ();
-+      F77_INT mindim         = TO_F77_INT (args(1).idx_type_value ());
-+      F77_INT maxdim         = TO_F77_INT (args(2).idx_type_value ());
-+      F77_INT delay          = TO_F77_INT (args(3).idx_type_value ());
-+      F77_INT tmin           = TO_F77_INT (args(4).idx_type_value ());
-+      F77_INT cmin           = TO_F77_INT (args(5).idx_type_value ());
-       double resolution      = args(6).double_value ();
-       double seed            = args(7).double_value ();
--      octave_idx_type kmax   = args(8).idx_type_value ();
-+      F77_INT kmax           = TO_F77_INT (args(8).idx_type_value ());
-       bool verbose           = args(9).bool_value ();
--      octave_idx_type iverb  = verbose;
-+      F77_INT iverb          = TO_F77_INT (verbose);
- 
- 
-       if (! error_state)
-         {
- 
--          octave_idx_type lines_read   = input.rows (); //nmax in d1()
--          octave_idx_type columns_read = input.columns ();
-+          F77_INT lines_read   = TO_F77_INT (input.rows ()); //nmax in d1()
-+          F77_INT columns_read = TO_F77_INT (input.columns ());
- 
- 
-           dim_vector dv (maxdim - mindim + 1, 1);
-@@ -94,7 +101,7 @@ DEFUN_DLD (__c1__, args, nargout, HELPTE
-           // Seed the rand() function for d1()
-           F77_XFCN (rand, RAND, (sqrt(seed)));
- 
--          for (octave_idx_type m = mindim; m <= maxdim; m++)
-+          for (F77_INT m = mindim; m <= maxdim; m++)
-             {
-               octave_scalar_map tmp (keys);
-               tmp.setfield ("dim", m);