The R Project SVN R

Rev

Rev 25960 | Rev 29423 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 25960 Rev 26894
Line 1... Line 1...
1 
/*
 1 
/*
2 
 *  Mathlib : A C Library of Special Functions
 2 
 *  Mathlib : A C Library of Special Functions
3 
 *  Copyright (C) 1998-2000  The R Development Core Team
 3 
 *  Copyright (C) 1998-2003  The R Development Core Team
4 
 *
 4 
 *
5 
 *  This program is free software; you can redistribute it and/or modify
 5 
 *  This program is free software; you can redistribute it and/or modify
6 
 *  it under the terms of the GNU General Public License as published by
 6 
 *  it under the terms of the GNU General Public License as published by
7 
 *  the Free Software Foundation; either version 2 of the License, or
 7 
 *  the Free Software Foundation; either version 2 of the License, or
8 
 *  (at your option) any later version.
 8 
 *  (at your option) any later version.
Line 41... Line 41...
41 
#include <R_ext/Arith.h>
 41 
#include <R_ext/Arith.h>
42 
#define ML_POSINF	R_PosInf
 42 
#define ML_POSINF	R_PosInf
43 
#define ML_NEGINF	R_NegInf
 43 
#define ML_NEGINF	R_NegInf
44 
#define ML_NAN		R_NaN
 44 
#define ML_NAN		R_NaN
45 
 
 45 
 
- 
 
 46 
void R_CheckUserInterrupt(void);
- 
 
 47 
#define calloc R_chk_calloc
- 
 
 48 
#define free R_chk_free
46 
#else
 49 
#else
47 
/* Mathlib standalone */
 50 
/* Mathlib standalone */
48 
 
 51 
 
49 
#include <stdio.h>
 52 
#include <stdio.h>
50 
# define MATHLIB_ERROR(fmt,x)	{ printf(fmt,x); exit(1); }
 53 
# define MATHLIB_ERROR(fmt,x)	{ printf(fmt,x); exit(1); }