View | Details | Raw Unified
Collapse All | Expand All

(-) file_not_specified_in_diff (-11 / +31 lines)
 Lines 29-34    Link Here  
#include <iostream>
#include <iostream>
#include <fstream>
#include <fstream>
#include <string>
#include <string>
#include <cstring>
 
#include <cstdlib>
 
#include <map>
#include <map>

        
static const char doc_delim = '';
static const char doc_delim = '';

  

    

    

       Lines 32-37
       
    
  Link Here 
    

  

        

        
#include <iostream>
#include <iostream>

        
#include <string>
#include <string>

            

              
              
#include <cstring>

            

        

        
#include "lo-error.h"
#include "lo-error.h"

        
#include "str-vec.h"
#include "str-vec.h"

  

    

    

       Lines 28-33
       
    
  Link Here 
    

  

        
#include <cctype>
#include <cctype>

        

        
#include <iostream>
#include <iostream>

            

              
              
#include <cstdlib>

            

        

        
#include "byte-swap.h"
#include "byte-swap.h"

        
#include "data-conv.h"
#include "data-conv.h"

  

    

    

       Lines 27-32
       
    
  Link Here 
    

  

        

        
#include <iostream>
#include <iostream>

        
#include <string>
#include <string>

            

              
              
#include <cstring>

            

        

        
#ifdef HAVE_UNISTD_H
#ifdef HAVE_UNISTD_H

        
#ifdef HAVE_SYS_TYPES_H
#ifdef HAVE_SYS_TYPES_H

  

    

    

       Lines 31-36
       
    
  Link Here 
    

  

        
#include <cstdio>
#include <cstdio>

        

        
#include <string>
#include <string>

            

              
              
#include <cstring>

            

        

        
#ifdef HAVE_UNISTD_H
#ifdef HAVE_UNISTD_H

        
#ifdef HAVE_SYS_TYPES_H
#ifdef HAVE_SYS_TYPES_H

  

    

    

       Lines 45-50
       
    
  Link Here 
    

  

        
#include <cstdlib>
#include <cstdlib>

        

        
#include <string>
#include <string>

            

              
              
#include <cstring>

            

        

        
#ifdef HAVE_UNISTD_H
#ifdef HAVE_UNISTD_H

        
#ifdef HAVE_SYS_TYPES_H
#ifdef HAVE_SYS_TYPES_H

  

    

    

       Lines 84-89
       
    
  Link Here 
    

  

        
#include <config.h>
#include <config.h>

        
#endif
#endif

        

            

              
              
#include <cstdlib>

            

            

              
              
#include <cstring>

            

            

              
              

            

        
#include "lo-mappers.h"
#include "lo-mappers.h"

        
#include "quit.h"
#include "quit.h"

        
#include "oct-sort.h"
#include "oct-sort.h"

  

    

    

       Lines 294-300
       
    
  Link Here 
    

  

        
template class octave_sort<vec_index<unsigned EIGHT_BYTE_INT> *>;
template class octave_sort<vec_index<unsigned EIGHT_BYTE_INT> *>;

        

        
template <>
template <>

            

              
static octave_value

              
octave_value

            

        
mx_sort (ArrayN<double> &m, int dim, sortmode mode)
mx_sort (ArrayN<double> &m, int dim, sortmode mode)

        
{
{

        
  octave_value retval;
  octave_value retval;

  

    

    

       Lines 345-355
       
    
  Link Here 
    

  

        
	  // things up.
	  // things up.

        

        
	  if (lo_ieee_signbit (octave_NaN))
	  if (lo_ieee_signbit (octave_NaN))

            

              
              
	  {

            

        
	    if (mode == UNDEFINED || mode == ASCENDING)
	    if (mode == UNDEFINED || mode == ASCENDING)

        
	      {
	      {

        
		unsigned int i = 0;
		unsigned int i = 0;

        
		double *vtmp = (double *)p;
		double *vtmp = (double *)p;

            

              
		while (xisnan (vtmp[i++]) && i < ns);

              
		while (xisnan (vtmp[i++]) && i < ns) {}

            

        
		for (unsigned int l = 0; l < ns - i + 1; l++)
		for (unsigned int l = 0; l < ns - i + 1; l++)

        
		  vtmp[l] = vtmp[l+i-1];
		  vtmp[l] = vtmp[l+i-1];

        
		for (unsigned int l = ns - i + 1; l < ns; l++)
		for (unsigned int l = ns - i + 1; l < ns; l++)

  

    

    

       Lines 359-370
       
    
  Link Here 
    

  

        
	      {
	      {

        
		unsigned int i = ns;
		unsigned int i = ns;

        
		double *vtmp = (double *)p;
		double *vtmp = (double *)p;

            

              
		while (xisnan (vtmp[--i]) && i > 0);

              
		while (xisnan (vtmp[--i]) && i > 0) {}

            

        
		for (int l = i; l >= 0; l--)
		for (int l = i; l >= 0; l--)

        
		  vtmp[l-i+ns-1] = vtmp[l];
		  vtmp[l-i+ns-1] = vtmp[l];

        
		for (unsigned int l = 0; l < ns - i - 1; l++)
		for (unsigned int l = 0; l < ns - i - 1; l++)

        
		  vtmp[l] = octave_NaN;
		  vtmp[l] = octave_NaN;

        
	      }
	      }

            

              
              
	  }

            

        

        
	  p += ns;
	  p += ns;

        
	}
	}

  

    

    

       Lines 404-413
       
    
  Link Here 
    

  

        
	  // fix things up.
	  // fix things up.

        

        
	  if (lo_ieee_signbit (octave_NaN))
	  if (lo_ieee_signbit (octave_NaN))

            

              
              
	  {

            

        
	    if (mode == UNDEFINED || mode == ASCENDING)
	    if (mode == UNDEFINED || mode == ASCENDING)

        
	      {
	      {

        
		unsigned int i = 0;
		unsigned int i = 0;

            

              
		while (xisnan (v[i++*stride + offset]) && i < ns);

              
		while (xisnan (v[i++*stride + offset]) && i < ns) {}

            

        
		for (unsigned int l = 0; l < ns - i + 1; l++)
		for (unsigned int l = 0; l < ns - i + 1; l++)

        
		  v[l*stride + offset] = v[(l+i-1)*stride + offset];
		  v[l*stride + offset] = v[(l+i-1)*stride + offset];

        
		for (unsigned int l = ns - i + 1; l < ns; l++)
		for (unsigned int l = ns - i + 1; l < ns; l++)

  

    

    

       Lines 416-427
       
    
  Link Here 
    

  

        
	    else
	    else

        
	      {
	      {

        
		unsigned int i = ns;
		unsigned int i = ns;

            

              
		while (xisnan (v[--i*stride + offset]) && i > 0);

              
		while (xisnan (v[--i*stride + offset]) && i > 0) {}

            

        
		for (int l = i; l >= 0; l--)
		for (int l = i; l >= 0; l--)

        
		  v[(l-i+ns-1)*stride + offset] = v[l*stride + offset];
		  v[(l-i+ns-1)*stride + offset] = v[l*stride + offset];

        
		for (unsigned int l = 0; l < ns - i - 1; l++)
		for (unsigned int l = 0; l < ns - i - 1; l++)

        
		  v[l*stride + offset] = octave_NaN;
		  v[l*stride + offset] = octave_NaN;

        
	      }
	      }

            

              
              
	  }

            

        
	}
	}

        
    }
    }

        

  

    

    

       Lines 431-437
       
    
  Link Here 
    

  

        
}
}

        

        
template <>
template <>

            

              
static octave_value_list

              
octave_value_list

            

        
mx_sort_indexed (ArrayN<double> &m, int dim, sortmode mode)
mx_sort_indexed (ArrayN<double> &m, int dim, sortmode mode)

        
{
{

        
  octave_value_list retval;
  octave_value_list retval;

  

    

    

       Lines 506-515
       
    
  Link Here 
    

  

        
      // If it will be sorted to the beginning, fix things up.
      // If it will be sorted to the beginning, fix things up.

        

        
      if (lo_ieee_signbit (octave_NaN))
      if (lo_ieee_signbit (octave_NaN))

            

              
              
      {

            

        
	if (mode == UNDEFINED || mode == ASCENDING)
	if (mode == UNDEFINED || mode == ASCENDING)

        
	  {
	  {

        
	    unsigned int i = 0;
	    unsigned int i = 0;

            

              
	    while (xisnan (v[i++*stride+offset]) && i < ns);

              
	    while (xisnan (v[i++*stride+offset]) && i < ns) {}

            

        
	    OCTAVE_LOCAL_BUFFER (double, itmp, i - 1);
	    OCTAVE_LOCAL_BUFFER (double, itmp, i - 1);

        
	    for (unsigned int l = 0; l < i -1; l++)
	    for (unsigned int l = 0; l < i -1; l++)

        
	      itmp[l] = idx(l*stride + offset);
	      itmp[l] = idx(l*stride + offset);

  

    

    

       Lines 527-533
       
    
  Link Here 
    

  

        
	else 
	else 

        
	  {
	  {

        
	    unsigned int i = ns;
	    unsigned int i = ns;

            

              
	    while (xisnan (v[--i*stride+offset]) && i > 0);

              
	    while (xisnan (v[--i*stride+offset]) && i > 0) {}

            

        
	    OCTAVE_LOCAL_BUFFER (double, itmp, ns - i - 1);
	    OCTAVE_LOCAL_BUFFER (double, itmp, ns - i - 1);

        
	    for (unsigned int l = 0; l < ns - i -1; l++)
	    for (unsigned int l = 0; l < ns - i -1; l++)

        
	      itmp[l] = idx((l+i+1)*stride + offset);
	      itmp[l] = idx((l+i+1)*stride + offset);

  

    

    

       Lines 542-547
       
    
  Link Here 
    

  

        
		idx(l*stride + offset) = itmp[k];
		idx(l*stride + offset) = itmp[k];

        
	      }
	      }

        
	  }
	  }

            

              
              
	}

            

        
    }
    }

        

        
  retval(1) = idx;
  retval(1) = idx;

  

    

    

       Lines 42-47
       
    
  Link Here 
    

  

        
#include <cerrno>
#include <cerrno>

        
#include <climits>
#include <climits>

        
#include <cstdio>
#include <cstdio>

            

              
              
#include <cstring>

            

        

        
#include <iostream>
#include <iostream>

        
#include <vector>
#include <vector>

  

    

    

       Lines 1255-1261
       
    
  Link Here 
    

  

        
			int c3 = is.get ();
			int c3 = is.get ();

        

        
			if (c3 != EOF)
			if (c3 != EOF)

            

              

              
			{

            

        
			  if (c3 == 'f')
			  if (c3 == 'f')

        
			    {
			    {

        
			      int c4 = is.get ();
			      int c4 = is.get ();

  

    

    

       Lines 1290-1295
       
    
  Link Here 
    

  

        

        
			      is >> ref;
			      is >> ref;

        
			    }
			    }

            

              
              
			}

            

        
		      }
		      }

        
		    else
		    else

        
		      {
		      {

  

    

    

       Lines 126-132
       
    
  Link Here 
    

  

        
      OSSTREAM buf;
      OSSTREAM buf;

        

        
      // Skip preceeding newline(s)
      // Skip preceeding newline(s)

            

              
      while (is.get (c) && c == '\n');

              
      while (is.get (c) && c == '\n') {}

            

        

        
      if (is)
      if (is)

        
	{
	{

  

    

    

       Lines 34-39
       
    
  Link Here 
    

  

        

        
#include <cassert>
#include <cassert>

        
#include <cstdio>
#include <cstdio>

            

              
              
#include <cstring>

            

        

        
#ifdef YYBYACC
#ifdef YYBYACC

        
#include <cstdlib>
#include <cstdlib>

  

    

    

       Lines 1602-1608
       
    
  Link Here 
    

  

        
}
}

        

        
template <>
template <>

            

              
static inline void

              
inline void

            

        
pr_plus_format (std::ostream& os, const Complex& c)
pr_plus_format (std::ostream& os, const Complex& c)

        
{
{

        
  double rp = c.real ();
  double rp = c.real ();

  

    

    

       Lines 30-35
       
    
  Link Here 
    

  

        
#endif
#endif

        

        
#include <cstddef>
#include <cstddef>

            

              
              
#include <cstring>

            

        

        
#include "CMatrix.h"
#include "CMatrix.h"