@@ -49,124 +49,122 @@ Rcomplex NA_CPLX;
4949size_t r_type_sizes [100 ];
5050size_t r_type_order [100 ];
5151
52- static const
53- R_CallMethodDef callMethods [] = {
54- {"Csetattrib" , (DL_FUNC ) & setattrib , -1 },
55- {"Cbmerge" , (DL_FUNC ) & bmerge , -1 },
56- {"Cassign" , (DL_FUNC ) & assign , -1 },
57- {"Cdogroups" , (DL_FUNC ) & dogroups , -1 },
58- {"Ccopy" , (DL_FUNC ) & copy , -1 },
59- {"Cshallowwrapper" , (DL_FUNC ) & shallowwrapper , -1 },
60- {"Csetdt_nrows" , (DL_FUNC ) & setdt_nrows , -1 },
61- {"Calloccolwrapper" , (DL_FUNC ) & alloccolwrapper , -1 },
62- {"Cselfrefokwrapper" , (DL_FUNC ) & selfrefokwrapper , -1 },
63- {"Ctruelength" , (DL_FUNC ) & truelength , -1 },
64- {"Csetcharvec" , (DL_FUNC ) & setcharvec , -1 },
65- {"Csetcolorder" , (DL_FUNC ) & setcolorder , -1 },
66- {"Cchmatch" , (DL_FUNC ) & chmatch_R , -1 },
67- {"Cchmatchdup" , (DL_FUNC ) & chmatchdup_R , -1 },
68- {"Cchin" , (DL_FUNC ) & chin_R , -1 },
69- {"CfreadR" , (DL_FUNC ) & freadR , -1 },
70- {"CfwriteR" , (DL_FUNC ) & fwriteR , -1 },
71- {"Creorder" , (DL_FUNC ) & reorder , -1 },
72- {"Crbindlist" , (DL_FUNC ) & rbindlist , -1 },
73- {"Cvecseq" , (DL_FUNC ) & vecseq , -1 },
74- {"Csetlistelt" , (DL_FUNC ) & setlistelt , -1 },
75- {"CsetS4elt" , (DL_FUNC ) & setS4elt , -1 },
76- {"Caddress" , (DL_FUNC ) & address , -1 },
77- {"CexpandAltRep" , (DL_FUNC ) & expandAltRep , -1 },
78- {"Cfmelt" , (DL_FUNC ) & fmelt , -1 },
79- {"Cfcast" , (DL_FUNC ) & fcast , -1 },
80- {"Cuniqlist" , (DL_FUNC ) & uniqlist , -1 },
81- {"Cuniqlengths" , (DL_FUNC ) & uniqlengths , -1 },
82- {"CforderReuseSorting" , (DL_FUNC ) & forderReuseSorting , -1 },
83- {"Cforder" , (DL_FUNC ) & forder , -1 },
84- {"Cissorted" , (DL_FUNC ) & issorted , -1 },
85- {"Cgforce" , (DL_FUNC ) & gforce , -1 },
86- {"Cgsum" , (DL_FUNC ) & gsum , -1 },
87- {"Cgmean" , (DL_FUNC ) & gmean , -1 },
88- {"Cgmin" , (DL_FUNC ) & gmin , -1 },
89- {"Cgmax" , (DL_FUNC ) & gmax , -1 },
90- {"CisOrderedSubset" , (DL_FUNC ) & isOrderedSubset , -1 },
91- {"CsetNumericRounding" , (DL_FUNC ) & setNumericRounding , -1 },
92- {"CgetNumericRounding" , (DL_FUNC ) & getNumericRounding , -1 },
93- {"Cbinary" , (DL_FUNC ) & binary , -1 },
94- {"CsubsetDT" , (DL_FUNC ) & subsetDT , -1 },
95- {"CsubsetVector" , (DL_FUNC ) & subsetVector , -1 },
96- {"CconvertNegAndZeroIdx" , (DL_FUNC ) & convertNegAndZeroIdx , -1 },
97- {"Cfrank" , (DL_FUNC ) & frank , -1 },
98- {"Cdt_na" , (DL_FUNC ) & dt_na , -1 },
99- {"Clookup" , (DL_FUNC ) & lookup , -1 },
100- {"Coverlaps" , (DL_FUNC ) & overlaps , -1 },
101- {"Cwhichwrapper" , (DL_FUNC ) & whichwrapper , -1 },
102- {"Cshift" , (DL_FUNC ) & shift , -1 },
103- {"Ctranspose" , (DL_FUNC ) & transpose , -1 },
104- {"CanyNA" , (DL_FUNC ) & anyNA , -1 },
105- {"CfitsInInt32R" , (DL_FUNC ) & fitsInInt32R , -1 },
106- {"CfitsInInt64R" , (DL_FUNC ) & fitsInInt64R , -1 },
107- {"Csetlevels" , (DL_FUNC ) & setlevels , -1 },
108- {"Crleid" , (DL_FUNC ) & rleid , -1 },
109- {"Cgmedian" , (DL_FUNC ) & gmedian , -1 },
110- {"Cgtail" , (DL_FUNC ) & gtail , -1 },
111- {"Cghead" , (DL_FUNC ) & ghead , -1 },
112- {"Cglast" , (DL_FUNC ) & glast , -1 },
113- {"Cgfirst" , (DL_FUNC ) & gfirst , -1 },
114- {"Cgnthvalue" , (DL_FUNC ) & gnthvalue , -1 },
115- {"Cdim" , (DL_FUNC ) & dim , -1 },
116- {"Cgvar" , (DL_FUNC ) & gvar , -1 },
117- {"Cgsd" , (DL_FUNC ) & gsd , -1 },
118- {"Cgprod" , (DL_FUNC ) & gprod , -1 },
119- {"Cgshift" , (DL_FUNC ) & gshift , -1 },
120- {"Cnestedid" , (DL_FUNC ) & nestedid , -1 },
121- {"CsetDTthreads" , (DL_FUNC ) & setDTthreads , -1 },
122- {"CgetDTthreads" , (DL_FUNC ) & getDTthreads_R , -1 },
123- {"CgetDTthreadsC" , (DL_FUNC ) & getDTthreads_C , -1 },
124- {"CnqRecreateIndices" , (DL_FUNC ) & nqRecreateIndices , -1 },
125- {"Cfsort" , (DL_FUNC ) & fsort , -1 },
126- {"Cinrange" , (DL_FUNC ) & inrange , -1 },
127- {"Cbetween" , (DL_FUNC ) & between , -1 },
128- {"ChasOpenMP" , (DL_FUNC ) & hasOpenMP , -1 },
129- {"CuniqueNlogical" , (DL_FUNC ) & uniqueNlogical , -1 },
130- {"CfrollfunR" , (DL_FUNC ) & frollfunR , -1 },
131- {"CdllVersion" , (DL_FUNC ) & dllVersion , -1 },
132- {"CnafillR" , (DL_FUNC ) & nafillR , -1 },
133- {"CcolnamesInt" , (DL_FUNC ) & colnamesInt , -1 },
134- {"CinitLastUpdated" , (DL_FUNC ) & initLastUpdated , -1 },
135- {"Ccj" , (DL_FUNC ) & cj , -1 },
136- {"Ccoalesce" , (DL_FUNC ) & coalesce , -1 },
137- {"CfifelseR" , (DL_FUNC ) & fifelseR , -1 },
138- {"CfcaseR" , (DL_FUNC ) & fcaseR , -1 },
139- {"C_lock" , (DL_FUNC ) & lock , -1 }, // _ for these 3 to avoid Clock as in time
140- {"C_unlock" , (DL_FUNC ) & unlock , -1 },
141- {"C_islocked" , (DL_FUNC ) & islockedR , -1 },
142- {"CtestMsgR" , (DL_FUNC ) & testMsgR , -1 },
143- {"C_allNAR" , (DL_FUNC ) & allNAR , -1 },
144- {"CcoerceAs" , (DL_FUNC ) & coerceAs , -1 },
145- {"Ctest_dt_win_snprintf" , (DL_FUNC )& test_dt_win_snprintf , -1 },
146- {"Cdt_zlib_version" , (DL_FUNC )& dt_zlib_version , -1 },
147- {"Cdt_has_zlib" , (DL_FUNC )& dt_has_zlib , -1 },
148- {"Csubstitute_call_arg_namesR" , (DL_FUNC ) & substitute_call_arg_namesR , -1 },
149- {"CstartsWithAny" , (DL_FUNC )& startsWithAny , -1 },
150- {"CconvertDate" , (DL_FUNC )& convertDate , -1 },
151- {"Cnotchin" , (DL_FUNC )& notchin , -1 },
152- {"Ccbindlist" , (DL_FUNC ) & cbindlist , -1 },
153- {"CperhapsDataTableR" , (DL_FUNC ) & perhapsDataTableR , -1 },
154- {"CcopyCols" , (DL_FUNC ) & copyCols , -1 },
155- {"Cwarn_matrix_column_r" , (DL_FUNC )& warn_matrix_column_r , -1 },
156- {"Cfrev" , (DL_FUNC ) & frev , -1 },
157- {"CmemcpyVector" , (DL_FUNC )& memcpyVector , -1 },
158- {"CmemcpyDT" , (DL_FUNC )& memcpyDT , -1 },
159- {"CmemcpyVectoradaptive" , (DL_FUNC )& memcpyVectoradaptive , -1 },
160- {"CmemcpyDTadaptive" , (DL_FUNC )& memcpyDTadaptive , -1 },
161- {"Csetgrowable" , (DL_FUNC )& setgrowable , -1 },
162- {"Cfrolladapt" , (DL_FUNC )& frolladapt , -1 },
163- {NULL , NULL , 0 }
52+ static const R_CallMethodDef callMethods [] = {
53+ { "Csetattrib" , (DL_FUNC )& setattrib , -1 },
54+ { "Cbmerge" , (DL_FUNC )& bmerge , -1 },
55+ { "Cassign" , (DL_FUNC )& assign , -1 },
56+ { "Cdogroups" , (DL_FUNC )& dogroups , -1 },
57+ { "Ccopy" , (DL_FUNC )& copy , -1 },
58+ { "Cshallowwrapper" , (DL_FUNC )& shallowwrapper , -1 },
59+ { "Csetdt_nrows" , (DL_FUNC )& setdt_nrows , -1 },
60+ { "Calloccolwrapper" , (DL_FUNC )& alloccolwrapper , -1 },
61+ { "Cselfrefokwrapper" , (DL_FUNC )& selfrefokwrapper , -1 },
62+ { "Ctruelength" , (DL_FUNC )& truelength , -1 },
63+ { "Csetcharvec" , (DL_FUNC )& setcharvec , -1 },
64+ { "Csetcolorder" , (DL_FUNC )& setcolorder , -1 },
65+ { "Cchmatch" , (DL_FUNC )& chmatch_R , -1 },
66+ { "Cchmatchdup" , (DL_FUNC )& chmatchdup_R , -1 },
67+ { "Cchin" , (DL_FUNC )& chin_R , -1 },
68+ { "CfreadR" , (DL_FUNC )& freadR , -1 },
69+ { "CfwriteR" , (DL_FUNC )& fwriteR , -1 },
70+ { "Creorder" , (DL_FUNC )& reorder , -1 },
71+ { "Crbindlist" , (DL_FUNC )& rbindlist , -1 },
72+ { "Cvecseq" , (DL_FUNC )& vecseq , -1 },
73+ { "Csetlistelt" , (DL_FUNC )& setlistelt , -1 },
74+ { "CsetS4elt" , (DL_FUNC )& setS4elt , -1 },
75+ { "Caddress" , (DL_FUNC )& address , -1 },
76+ { "CexpandAltRep" , (DL_FUNC )& expandAltRep , -1 },
77+ { "Cfmelt" , (DL_FUNC )& fmelt , -1 },
78+ { "Cfcast" , (DL_FUNC )& fcast , -1 },
79+ { "Cuniqlist" , (DL_FUNC )& uniqlist , -1 },
80+ { "Cuniqlengths" , (DL_FUNC )& uniqlengths , -1 },
81+ { "CforderReuseSorting" , (DL_FUNC )& forderReuseSorting , -1 },
82+ { "Cforder" , (DL_FUNC )& forder , -1 },
83+ { "Cissorted" , (DL_FUNC )& issorted , -1 },
84+ { "Cgforce" , (DL_FUNC )& gforce , -1 },
85+ { "Cgsum" , (DL_FUNC )& gsum , -1 },
86+ { "Cgmean" , (DL_FUNC )& gmean , -1 },
87+ { "Cgmin" , (DL_FUNC )& gmin , -1 },
88+ { "Cgmax" , (DL_FUNC )& gmax , -1 },
89+ { "CisOrderedSubset" , (DL_FUNC )& isOrderedSubset , -1 },
90+ { "CsetNumericRounding" , (DL_FUNC )& setNumericRounding , -1 },
91+ { "CgetNumericRounding" , (DL_FUNC )& getNumericRounding , -1 },
92+ { "Cbinary" , (DL_FUNC )& binary , -1 },
93+ { "CsubsetDT" , (DL_FUNC )& subsetDT , -1 },
94+ { "CsubsetVector" , (DL_FUNC )& subsetVector , -1 },
95+ { "CconvertNegAndZeroIdx" , (DL_FUNC )& convertNegAndZeroIdx , -1 },
96+ { "Cfrank" , (DL_FUNC )& frank , -1 },
97+ { "Cdt_na" , (DL_FUNC )& dt_na , -1 },
98+ { "Clookup" , (DL_FUNC )& lookup , -1 },
99+ { "Coverlaps" , (DL_FUNC )& overlaps , -1 },
100+ { "Cwhichwrapper" , (DL_FUNC )& whichwrapper , -1 },
101+ { "Cshift" , (DL_FUNC )& shift , -1 },
102+ { "Ctranspose" , (DL_FUNC )& transpose , -1 },
103+ { "CanyNA" , (DL_FUNC )& anyNA , -1 },
104+ { "CfitsInInt32R" , (DL_FUNC )& fitsInInt32R , -1 },
105+ { "CfitsInInt64R" , (DL_FUNC )& fitsInInt64R , -1 },
106+ { "Csetlevels" , (DL_FUNC )& setlevels , -1 },
107+ { "Crleid" , (DL_FUNC )& rleid , -1 },
108+ { "Cgmedian" , (DL_FUNC )& gmedian , -1 },
109+ { "Cgtail" , (DL_FUNC )& gtail , -1 },
110+ { "Cghead" , (DL_FUNC )& ghead , -1 },
111+ { "Cglast" , (DL_FUNC )& glast , -1 },
112+ { "Cgfirst" , (DL_FUNC )& gfirst , -1 },
113+ { "Cgnthvalue" , (DL_FUNC )& gnthvalue , -1 },
114+ { "Cdim" , (DL_FUNC )& dim , -1 },
115+ { "Cgvar" , (DL_FUNC )& gvar , -1 },
116+ { "Cgsd" , (DL_FUNC )& gsd , -1 },
117+ { "Cgprod" , (DL_FUNC )& gprod , -1 },
118+ { "Cgshift" , (DL_FUNC )& gshift , -1 },
119+ { "Cnestedid" , (DL_FUNC )& nestedid , -1 },
120+ { "CsetDTthreads" , (DL_FUNC )& setDTthreads , -1 },
121+ { "CgetDTthreads" , (DL_FUNC )& getDTthreads_R , -1 },
122+ { "CgetDTthreadsC" , (DL_FUNC )& getDTthreads_C , -1 },
123+ { "CnqRecreateIndices" , (DL_FUNC )& nqRecreateIndices , -1 },
124+ { "Cfsort" , (DL_FUNC )& fsort , -1 },
125+ { "Cinrange" , (DL_FUNC )& inrange , -1 },
126+ { "Cbetween" , (DL_FUNC )& between , -1 },
127+ { "ChasOpenMP" , (DL_FUNC )& hasOpenMP , -1 },
128+ { "CuniqueNlogical" , (DL_FUNC )& uniqueNlogical , -1 },
129+ { "CfrollfunR" , (DL_FUNC )& frollfunR , -1 },
130+ { "CdllVersion" , (DL_FUNC )& dllVersion , -1 },
131+ { "CnafillR" , (DL_FUNC )& nafillR , -1 },
132+ { "CcolnamesInt" , (DL_FUNC )& colnamesInt , -1 },
133+ { "CinitLastUpdated" , (DL_FUNC )& initLastUpdated , -1 },
134+ { "Ccj" , (DL_FUNC )& cj , -1 },
135+ { "Ccoalesce" , (DL_FUNC )& coalesce , -1 },
136+ { "CfifelseR" , (DL_FUNC )& fifelseR , -1 },
137+ { "CfcaseR" , (DL_FUNC )& fcaseR , -1 },
138+ { "C_lock" , (DL_FUNC )& lock , -1 }, // _ for these 3 to avoid Clock as in time
139+ { "C_unlock" , (DL_FUNC )& unlock , -1 },
140+ { "C_islocked" , (DL_FUNC )& islockedR , -1 },
141+ { "CtestMsgR" , (DL_FUNC )& testMsgR , -1 },
142+ { "C_allNAR" , (DL_FUNC )& allNAR , -1 },
143+ { "CcoerceAs" , (DL_FUNC )& coerceAs , -1 },
144+ { "Ctest_dt_win_snprintf" , (DL_FUNC )& test_dt_win_snprintf , -1 },
145+ { "Cdt_zlib_version" , (DL_FUNC )& dt_zlib_version , -1 },
146+ { "Cdt_has_zlib" , (DL_FUNC )& dt_has_zlib , -1 },
147+ { "Csubstitute_call_arg_namesR" , (DL_FUNC )& substitute_call_arg_namesR , -1 },
148+ { "CstartsWithAny" , (DL_FUNC )& startsWithAny , -1 },
149+ { "CconvertDate" , (DL_FUNC )& convertDate , -1 },
150+ { "Cnotchin" , (DL_FUNC )& notchin , -1 },
151+ { "Ccbindlist" , (DL_FUNC )& cbindlist , -1 },
152+ { "CperhapsDataTableR" , (DL_FUNC )& perhapsDataTableR , -1 },
153+ { "CcopyCols" , (DL_FUNC )& copyCols , -1 },
154+ { "Cwarn_matrix_column_r" , (DL_FUNC )& warn_matrix_column_r , -1 },
155+ { "Cfrev" , (DL_FUNC )& frev , -1 },
156+ { "CmemcpyVector" , (DL_FUNC )& memcpyVector , -1 },
157+ { "CmemcpyDT" , (DL_FUNC )& memcpyDT , -1 },
158+ { "CmemcpyVectoradaptive" , (DL_FUNC )& memcpyVectoradaptive , -1 },
159+ { "CmemcpyDTadaptive" , (DL_FUNC )& memcpyDTadaptive , -1 },
160+ { "Csetgrowable" , (DL_FUNC )& setgrowable , -1 },
161+ { "Cfrolladapt" , (DL_FUNC )& frolladapt , -1 },
162+ { NULL , NULL , 0 }
164163};
165164
166- static const
167- R_ExternalMethodDef externalMethods [] = {
168- {"Cfastmean" , (DL_FUNC ) & fastmean , -1 },
169- {NULL , NULL , 0 }
165+ static const R_ExternalMethodDef externalMethods [] = {
166+ { "Cfastmean" , (DL_FUNC )& fastmean , -1 },
167+ { NULL , NULL , 0 }
170168};
171169
172170static void setSizes (void ) {
0 commit comments