The R Project SVN R

Rev

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

Rev 2429 Rev 2467
Line 18... Line 18...
18
 */
18
 */
19
 
19
 
20
#ifndef PRINT_H_
20
#ifndef PRINT_H_
21
#define PRINT_H_
21
#define PRINT_H_
22
 
22
 
23
#define COMPLEX_DATA/* as in ./Defn.h */
-
 
24
#define PRINT_GAP	print_gap
23
#include "PrtUtil.h"
25
#define PRINT_WIDTH	R_print_width
24
#include "Defn.h"
26
 
25
 
27
#define adj_right 1
-
 
28
#define adj_left  0
-
 
29
 
-
 
30
extern int  R_print_width;
-
 
31
extern SEXP print_na_string;
26
extern SEXP print_na_string;
32
extern int  print_na_width;
-
 
33
extern int  print_quote;
-
 
34
extern int  print_digits;
-
 
35
extern int  print_gap;
-
 
36
 
27
 
37
/* Computation of printing formats */
28
/* Computation of printing formats */
38
void formatLogical(int*,int,int*);
-
 
39
void formatFactor(int*, int, int*, SEXP, int);
-
 
40
void formatInteger(int*,int,int*);
-
 
41
void formatReal(double*, int, int*, int*, int*);
-
 
42
void formatComplex(complex*, int, int*, int*, int*, int*, int*, int*);
-
 
43
void formatString(SEXP*, int, int*, int);
29
void formatString(SEXP*, int, int*, int);
44
 
30
 
45
/* Formating of values */
31
/* Formating of values */
46
char *EncodeLogical(int, int);
-
 
47
char *EncodeFactor(int, int, int, SEXP);
32
char *EncodeFactor(int, int, int, SEXP);
48
char *EncodeInteger(int, int);
-
 
49
char *EncodeReal(double, int, int, int);
-
 
50
char *EncodeComplex(complex, int, int, int, int, int, int);
-
 
51
char *EncodeString(char*, int, int, int);
-
 
52
char *EncodeElement(SEXP, int, int);
33
char *EncodeElement(SEXP, int, int);
53
 
34
 
54
/* Printing */
35
/* Printing */
55
int IndexWidth(int n);
-
 
56
void MatrixColumnLabel(SEXP, int, int);
36
void MatrixColumnLabel(SEXP, int, int);
57
void RightMatrixColumnLabel(SEXP, int, int);
37
void RightMatrixColumnLabel(SEXP, int, int);
58
void LeftMatrixColumnLabel(SEXP, int, int);
38
void LeftMatrixColumnLabel(SEXP, int, int);
59
void MatrixRowLabel(SEXP, int, int);
39
void MatrixRowLabel(SEXP, int, int);
60
void VectorIndex(int, int);
-
 
61
 
40
 
62
/* In Defn.h (and MUST be there):
41
/* In Defn.h (and MUST be there):
63
   void CustomPrintValue(SEXP s ,SEXP env);
42
   CustomPrintValue,  PrintValue, PrintValueRec */
64
   void PrintValue(SEXP);
-
 
65
   void PrintValueRec(SEXP,SEXP);
-
 
66
   */
-
 
67
 
-
 
68
/*  REprintf(char*, ...); ... --> all in Defn.h */
-
 
69
 
-
 
70
void printArray(SEXP, SEXP, int, SEXP);
43
void printArray(SEXP, SEXP, int, SEXP);
71
void printMatrix(SEXP, int, SEXP, int, int, SEXP, SEXP);
44
void printMatrix(SEXP, int, SEXP, int, int, SEXP, SEXP);
72
void printNamedVector(SEXP, SEXP, int);
45
void printNamedVector(SEXP, SEXP, int);
73
void printVector(SEXP, int, int);
46
void printVector(SEXP, int, int);
74
void printRealVector(double *x, int n, int index);
-
 
75
void printComplexVector(complex *x, int n, int index);
-
 
76
 
47
 
77
#endif
48
#endif