Mercurial > octave-nkf

annotate liboctave/util/f2c-main.c @ 20651:e54ecb33727e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
lo-array-gripes.cc: Remove FIXME's related to buffer size. * lo-array-gripes.cc: Remove FIXME's related to buffer size. Shorten sprintf buffers from 100 to 64 characters (still well more than 19 required). Use 'const' decorator on constant value for clarity. Remove extra space between variable and array bracket.
author Rik <rik@octave.org>
date Mon, 12 Oct 2015 21:13:47 -0700
parents 57a3e21e131b
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2566
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
1 /*
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
2
19731
4197fc428c7d maint: Update copyright notices for 2015.
John W. Eaton <jwe@octave.org>
parents: 17744
diff changeset
3 Copyright (C) 1996-2015 John W. Eaton
2566
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
4
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
5 This file is part of Octave.
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
6
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
7 Octave is free software; you can redistribute it and/or modify it
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
8 under the terms of the GNU General Public License as published by the
7016
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 5307
diff changeset
9 Free Software Foundation; either version 3 of the License, or (at your
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 5307
diff changeset
10 option) any later version.
2566
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
11
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
12 Octave is distributed in the hope that it will be useful, but WITHOUT
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
15 for more details.
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
16
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
7016
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 5307
diff changeset
18 along with Octave; see the file COPYING. If not, see
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 5307
diff changeset
19 <http://www.gnu.org/licenses/>.
2566
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
20
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
21 */
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
22
20450
57a3e21e131b * f2c-main.c: Include config.h.
Mike Miller <mtmiller@octave.org>
parents: 19731
diff changeset
23 #ifdef HAVE_CONFIG_H
57a3e21e131b * f2c-main.c: Include config.h.
Mike Miller <mtmiller@octave.org>
parents: 19731
diff changeset
24 #include <config.h>
57a3e21e131b * f2c-main.c: Include config.h.
Mike Miller <mtmiller@octave.org>
parents: 19731
diff changeset
25 #endif
57a3e21e131b * f2c-main.c: Include config.h.
Mike Miller <mtmiller@octave.org>
parents: 19731
diff changeset
26
2566
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
27 #include <assert.h>
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
28
3887
7da18459c08b [project @ 2002-04-04 00:44:21 by jwe]
jwe
parents: 2847
diff changeset
29
7da18459c08b [project @ 2002-04-04 00:44:21 by jwe]
jwe
parents: 2847
diff changeset
30 /* Dummy Fortran main declaration, needed in order to link to some
11586
12df7854fa7c strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents: 11523
diff changeset
31 Fortran libraries. See the AC_F77_DUMMY_MAIN macro documentation.
3887
7da18459c08b [project @ 2002-04-04 00:44:21 by jwe]
jwe
parents: 2847
diff changeset
32 This function should never be called. */
2566
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
33
3887
7da18459c08b [project @ 2002-04-04 00:44:21 by jwe]
jwe
parents: 2847
diff changeset
34 #ifdef F77_DUMMY_MAIN
7da18459c08b [project @ 2002-04-04 00:44:21 by jwe]
jwe
parents: 2847
diff changeset
35 # ifdef __cplusplus
7da18459c08b [project @ 2002-04-04 00:44:21 by jwe]
jwe
parents: 2847
diff changeset
36 extern "C"
7da18459c08b [project @ 2002-04-04 00:44:21 by jwe]
jwe
parents: 2847
diff changeset
37 # endif
15018
3d8ace26c5b4 maint: Use Octave coding conventions for cuddled parentheses in liboctave/.
Rik <rik@octave.org>
parents: 14846
diff changeset
38 int F77_DUMMY_MAIN () { assert (0); return 1; }
2566
bcdd6bf533ea [project @ 1996-12-06 00:51:31 by jwe]
jwe
parents:
diff changeset
39 #endif