view liboctave/randpoisson.h @ 15127:87411930d6c4

avoid "function declared 'noreturn' has a return statement" warning. * configure.ac (HAVE_ATTR_DEPRECATED, HAVE_ATTR_NORETURN, HAVE_ATTR_UNUSED): New macros, corresponding to GCC_ATTR_DEPRECATED, GCC_ATTR_NORETURN, and GCC_ATTR_UNUSED. * libcruft/misc/f77-fcn.c (xstopx): Use F77_NORETURN instead of F77_RETURN. * libcruft/misc/f77-fcn.h (F77_RETURN): New macro.
author John W. Eaton <jwe@octave.org>
date Wed, 08 Aug 2012 10:27:59 -0400
parents 43db83eff9db
children
line wrap: on
line source

/*

Copyright (C) 2006-2012 John W. Eaton

This file is part of Octave.

Octave is free software; you can redistribute it and/or modify it
under the terms of the GNU General Public License as published by the
Free Software Foundation; either version 3 of the License, or (at your
option) any later version.

Octave is distributed in the hope that it will be useful, but WITHOUT
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
for more details.

You should have received a copy of the GNU General Public License
along with Octave; see the file COPYING.  If not, see
<http://www.gnu.org/licenses/>.

*/

/* Original version written by Paul Kienzle distributed as free
   software in the in the public domain.  */

#ifndef _RANDPOISSON_H

#ifdef  __cplusplus
extern "C" {
#endif

extern OCTAVE_API double oct_randp (double L);
extern OCTAVE_API void oct_fill_randp (double L, octave_idx_type n, double *p);

extern OCTAVE_API float oct_float_randp (float L);
extern OCTAVE_API void oct_fill_float_randp (float L, octave_idx_type n, float *p);

#ifdef  __cplusplus
}
#endif
#endif