Mercurial > hg > octave-lyh

comparison liboctave/sun-utils.cc @ 3:9a4c07481e61

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1993-08-08 01:20:23 by jwe] Initial revision
author jwe
date Sun, 08 Aug 1993 01:21:46 +0000
parents
children 780cbbc57b7c
comparison
equal deleted inserted replaced
2:c0190df9885d 3:9a4c07481e61
1 // sun-utils.cc -*- C++ -*-
2 /*
3
4 Copyright (C) 1992, 1993 John W. Eaton
5
6 This file is part of Octave.
7
8 Octave is free software; you can redistribute it and/or modify it
9 under the terms of the GNU General Public License as published by the
10 Free Software Foundation; either version 2, or (at your option) any
11 later version.
12
13 Octave is distributed in the hope that it will be useful, but WITHOUT
14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
16 for more details.
17
18 You should have received a copy of the GNU General Public License
19 along with Octave; see the file COPYING. If not, write to the Free
20 Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
21
22 */
23
24 #ifdef sun
25
26 #ifdef __GNUG__
27 #pragma implementation
28 #endif
29
30 #include <assert.h>
31
32 /*
33 * I think that this is really only needed if linking to Fortran
34 * compiled libraries on a Sun. It should never be called.
35 * There should probably be a sysdep.cc file, eh?
36 */
37
38 extern "C"
39 {
40 int MAIN_ (void)
41 {
42 assert (0);
43 return 0;
44 }
45 }
46
47 #endif
48
49 /*
50 ;;; Local Variables: ***
51 ;;; mode: C++ ***
52 ;;; page-delimiter: "^/\\*" ***
53 ;;; End: ***
54 */
55