The R Project SVN R

Rev

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

Rev 19696 Rev 24068
Line 20... Line 20...
20 
*/
 20 
*/
21 
 
 21 
 
22 
/* Exports setulb()
 22 
/* Exports setulb()
23 
 *         ======
 23 
 *         ======
24 
 * called from lbfgsb() in ../main/optim.c */
 24 
 * called from lbfgsb() in ../main/optim.c */
25 
#ifndef Macintosh
 - 
 
26 
#include <math.h>
 25 
#include <math.h>
27 
#else
 - 
 
28 
#include <fp.h>
 - 
 
29 
#endif /* mac */
 - 
 
30 
#include <float.h> /* for DBL_EPSILON */
 26 
#include <float.h> /* for DBL_EPSILON */
31 
#include <string.h>
 27 
#include <string.h>
32 
#include <R_ext/RS.h> /* for F77_CALL */
 28 
#include <R_ext/RS.h> /* for F77_CALL */
33 
#include <R_ext/Linpack.h>
 29 
#include <R_ext/Linpack.h>
34 
#include <R_ext/Applic.h>
 30 
#include <R_ext/Applic.h>