File tree Expand file tree Collapse file tree 1 file changed +3
-16
lines changed Expand file tree Collapse file tree 1 file changed +3
-16
lines changed Original file line number Diff line number Diff line change @@ -36,13 +36,7 @@ namespace internal{
36
36
inline DimNameProxy& operator =(SEXP other) {
37
37
SEXP dims = Rf_getAttrib (data_, R_DimSymbol);
38
38
if (INTEGER (dims)[dim_] != Rf_length (other)) {
39
- std::stringstream s;
40
- s << " dimension extent is '"
41
- << INTEGER (dims)[dim_]
42
- << " ' while length of names is '"
43
- << Rf_length (other)
44
- << " '" ;
45
- stop (s.str ());
39
+ stop (" dimension extent is '%d' while length of names is '%d'" , INTEGER (dims)[dim_], Rf_length (other));
46
40
}
47
41
SEXP dimnames = Rf_getAttrib (data_, R_DimNamesSymbol);
48
42
if (Rf_isNull (dimnames)) {
@@ -55,17 +49,10 @@ namespace internal{
55
49
return *this ;
56
50
}
57
51
58
-
59
- inline DimNameProxy& operator =(const DimNameProxy& other) {
52
+ inline DimNameProxy& operator =(const DimNameProxy& other) {
60
53
SEXP dims = Rf_getAttrib (data_, R_DimSymbol);
61
54
if (INTEGER (dims)[dim_] != INTEGER (dims)[other.dim_ ]) {
62
- std::stringstream s;
63
- s << " dimension extent is '"
64
- << INTEGER (dims)[dim_]
65
- << " ' while length of names is '"
66
- << INTEGER (dims)[other.dim_ ]
67
- << " '" ;
68
- stop (s.str ());
55
+ stop (" dimension extent is '%d' while length of names is '%d'" , INTEGER (dims)[dim_], INTEGER (dims)[other.dim_ ]);
69
56
}
70
57
SEXP dimnames = Rf_getAttrib (data_, R_DimNamesSymbol);
71
58
SEXP other_dimnames = SEXP (other);
You can’t perform that action at this time.
0 commit comments