Mercurial > octave

comparison src/DLD-FUNCTIONS/getgrent.cc @ 3523:b80bbb43a1a9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2000-02-02 10:25:52 by jwe]
author jwe
date Wed, 02 Feb 2000 10:26:25 +0000
parents 2efa28a91e7a
children ccfdb55c8156
comparison
equal deleted inserted replaced
3522:bd422cf62f0c 3523:b80bbb43a1a9
71 Once the end of the data has been reached, @code{getgrent} returns 0.\n\ 71 Once the end of the data has been reached, @code{getgrent} returns 0.\n\
72 @end deftypefn") 72 @end deftypefn")
73 { 73 {
74 octave_value_list retval; 74 octave_value_list retval;
75 75
76 retval(1) = string (); 76 retval(1) = std::string ();
77 retval(0) = 0.0; 77 retval(0) = 0.0;
78 78
79 int nargin = args.length (); 79 int nargin = args.length ();
80 80
81 if (nargin == 0) 81 if (nargin == 0)
82 { 82 {
83 string msg; 83 std::string msg;
84 84
85 retval(0) = mk_gr_map (octave_group::getgrent (msg)); 85 retval(0) = mk_gr_map (octave_group::getgrent (msg));
86 retval(1) = msg; 86 retval(1) = msg;
87 } 87 }
88 else 88 else
99 @code{getgrgid} returns 0.\n\ 99 @code{getgrgid} returns 0.\n\
100 @end deftypefn") 100 @end deftypefn")
101 { 101 {
102 octave_value_list retval; 102 octave_value_list retval;
103 103
104 retval(1) = string (); 104 retval(1) = std::string ();
105 retval(0) = 0.0; 105 retval(0) = 0.0;
106 106
107 int nargin = args.length (); 107 int nargin = args.length ();
108 108
109 if (nargin == 1) 109 if (nargin == 1)
114 { 114 {
115 if (D_NINT (dval) == dval) 115 if (D_NINT (dval) == dval)
116 { 116 {
117 gid_t gid = static_cast<gid_t> (dval); 117 gid_t gid = static_cast<gid_t> (dval);
118 118
119 string msg; 119 std::string msg;
120 120
121 retval(0) = mk_gr_map (octave_group::getgrgid (gid, msg)); 121 retval(0) = mk_gr_map (octave_group::getgrgid (gid, msg));
122 retval(1) = msg; 122 retval(1) = msg;
123 } 123 }
124 else 124 else
139 @code{getgrname} returns 0.\n\ 139 @code{getgrname} returns 0.\n\
140 @end deftypefn") 140 @end deftypefn")
141 { 141 {
142 octave_value_list retval; 142 octave_value_list retval;
143 143
144 retval(1) = string (); 144 retval(1) = std::string ();
145 retval(0) = 0.0; 145 retval(0) = 0.0;
146 146
147 int nargin = args.length (); 147 int nargin = args.length ();
148 148
149 if (nargin == 1) 149 if (nargin == 1)
150 { 150 {
151 string s = args(0).string_value (); 151 std::string s = args(0).string_value ();
152 152
153 if (! error_state) 153 if (! error_state)
154 { 154 {
155 string msg; 155 std::string msg;
156 156
157 retval(0) = mk_gr_map (octave_group::getgrnam (s.c_str (), msg)); 157 retval(0) = mk_gr_map (octave_group::getgrnam (s.c_str (), msg));
158 retval(1) = msg; 158 retval(1) = msg;
159 } 159 }
160 } 160 }
170 Return the internal pointer to the beginning of the group database.\n\ 170 Return the internal pointer to the beginning of the group database.\n\
171 @end deftypefn") 171 @end deftypefn")
172 { 172 {
173 octave_value_list retval; 173 octave_value_list retval;
174 174
175 retval(1) = string (); 175 retval(1) = std::string ();
176 retval(0) = -1.0; 176 retval(0) = -1.0;
177 177
178 int nargin = args.length (); 178 int nargin = args.length ();
179 179
180 if (nargin == 0) 180 if (nargin == 0)
181 { 181 {
182 string msg; 182 std::string msg;
183 183
184 retval(0) = static_cast<double> (octave_group::setgrent (msg)); 184 retval(0) = static_cast<double> (octave_group::setgrent (msg));
185 retval(1) = msg; 185 retval(1) = msg;
186 } 186 }
187 else 187 else
196 Close the group database.\n\ 196 Close the group database.\n\
197 @end deftypefn") 197 @end deftypefn")
198 { 198 {
199 octave_value_list retval; 199 octave_value_list retval;
200 200
201 retval(1) = string (); 201 retval(1) = std::string ();
202 retval(0) = -1.0; 202 retval(0) = -1.0;
203 203
204 int nargin = args.length (); 204 int nargin = args.length ();
205 205
206 if (nargin == 0) 206 if (nargin == 0)
207 { 207 {
208 string msg; 208 std::string msg;
209 209
210 retval(0) = static_cast<double> (octave_group::endgrent (msg)); 210 retval(0) = static_cast<double> (octave_group::endgrent (msg));
211 retval(1) = msg; 211 retval(1) = msg;
212 } 212 }
213 else 213 else