fillfstring()

void fapidxx::fillfstring	(	const std::string &	s,
		char *	fstring,
		ftnlen	slen
	)

fill a Fortran string with a C++ string

Definition at line 60 of file helper.cc.

Referenced by fapidxx::WID2container::encodeascii(), freeblock(), sff_helper_decode_wid2__(), sff_ropen__(), sff_ropenfs__(), sff_ropens__(), sff_rtrace__(), sff_rtracefi__(), sff_rtracei__(), and sff_skipdata__().

  {
    std::string::const_iterator is=s.begin();
    char *op=fstring;
    for (int i=0; i<slen; ++i)
    {
      if (i<int(s.size()))
      {
        *op=*is;
      }
      else
      {
        *op=' ';
      }
      ++op;
      ++is;
    }
  } // void fillfstring(const std::string& s, char *fstring, ftnlen slen)

Here is the caller graph for this function: