Mercurial > hg > octave-nkf
comparison src/dynamic-ld.cc @ 762:4934fe58d117
[project @ 1994-10-03 03:24:09 by jwe]
author | jwe |
---|---|
date | Mon, 03 Oct 1994 03:24:09 +0000 |
parents | e77b62b20824 |
children | 466c3eb4b9d5 |
comparison
equal
deleted
inserted
replaced
761:f0133cd32852 | 762:4934fe58d117 |
---|---|
279 char *mangled_fcn_name = strconcat (name, "__FRC13Octave_objecti"); | 279 char *mangled_fcn_name = strconcat (name, "__FRC13Octave_objecti"); |
280 | 280 |
281 int status = dld_unlink_by_symbol (mangled_fcn_name, hard); | 281 int status = dld_unlink_by_symbol (mangled_fcn_name, hard); |
282 | 282 |
283 if (status != 0) | 283 if (status != 0) |
284 dld_perror ("octave_dld_tc2_unlink_by_symbol"); | 284 error ("octave_dld_tc2_unlink_by_symbol: %s", dld_strerror (0)); |
285 | 285 |
286 delete [] mangled_fcn_name; | 286 delete [] mangled_fcn_name; |
287 } | 287 } |
288 | 288 |
289 void | 289 void |
290 octave_dld_tc2_unlink_by_file (const char *name, int hard) | 290 octave_dld_tc2_unlink_by_file (const char *name, int hard) |
291 { | 291 { |
292 int status = dld_unlink_by_file (name, hard); | 292 int status = dld_unlink_by_file (name, hard); |
293 | 293 |
294 if (status != 0) | 294 if (status != 0) |
295 dld_perror ("octave_dld_tc2_unlink_by_file"); | 295 error ("octave_dld_tc2_unlink_by_file: %s", dld_strerror (0)); |
296 } | 296 } |
297 | 297 |
298 #endif | 298 #endif |
299 | 299 |
300 /* | 300 /* |