Mercurial > hg > octave-nkf

comparison src/oct-prcstrm.cc @ 3652:25e84fcef38a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2000-03-31 08:50:48 by jwe]
author jwe
date Fri, 31 Mar 2000 08:50:50 +0000
parents b1ff6597576f
children 08fe5f74c7d4
comparison
equal deleted inserted replaced
3651:c2305b99fbd7 3652:25e84fcef38a
49 } 49 }
50 } 50 }
51 51
52 octave_iprocstream::~octave_iprocstream (void) 52 octave_iprocstream::~octave_iprocstream (void)
53 { 53 {
54 do_close ();
55 }
56
57 void
58 octave_iprocstream::do_close (void)
59 {
54 if (fp) 60 if (fp)
55 { 61 {
56 pclose (fp); 62 pclose (fp);
57 fp = 0; 63 fp = 0;
58 } 64 }
79 } 85 }
80 } 86 }
81 87
82 octave_oprocstream::~octave_oprocstream (void) 88 octave_oprocstream::~octave_oprocstream (void)
83 { 89 {
90 do_close ();
91 }
92
93 void
94 octave_oprocstream::do_close (void)
95 {
84 if (fp) 96 if (fp)
85 { 97 {
86 pclose (fp); 98 pclose (fp);
87 fp = 0; 99 fp = 0;
88 } 100 }