File: HarmonicsPath.cc

package info (click to toggle)
xtide 2.6.4-1
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 2,996 kB
  • ctags: 2,617
  • sloc: cpp: 26,266; ansic: 8,105; makefile: 152; yacc: 113; sh: 54; lex: 54
file content (51 lines) | stat: -rw-r--r-- 1,514 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
// $Id: HarmonicsPath.cc,v 1.2 2002/10/04 13:44:00 flaterco Exp $
/*  HarmonicsPath  Storage of harmonics file names

    Copyright (C) 1997  David Flater.

    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 2 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, write to the Free Software
    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/

#include "common.hh"

HarmonicsPath::HarmonicsPath (Dstr &hfile_path) {
  pathlen = hfile_path.repchar (':', ' ') + 1;
  storage = new Dstr[pathlen];
  for (unsigned i=0; i<pathlen; i++)
    hfile_path /= storage[i];
}

HarmonicsPath::~HarmonicsPath() {
  delete [] storage;
}

unsigned HarmonicsPath::length() {
  return pathlen;
}

Dstr &HarmonicsPath::operator[] (unsigned index) {
  assert (index < pathlen);
  return storage[index];
}

#if 0
ostream &operator<< (ostream &out, HarmonicsPath h) {
  out << "Contents of HarmonicsPath:" << endl;
  unsigned i;
  for (i=0; i<h.length(); i++)
    out << "  " << h[i] << endl;
  return out;
}
#endif