WinAPIFunction.st
changeset 3909 10e26efa4fb4
parent 3908 6b71bf0b6d16
child 3912 bc757e3447e6
equal deleted inserted replaced
3908:6b71bf0b6d16 3909:10e26efa4fb4
   104 
   104 
   105      DANGER alert: This is an unprotected low-level entry.
   105      DANGER alert: This is an unprotected low-level entry.
   106      Not for normal application usage.
   106      Not for normal application usage.
   107     "
   107     "
   108 %{
   108 %{
       
   109     INT convertST_to_C();
   109     WINAPI_intFUNC func;
   110     WINAPI_intFUNC func;
   110     INT retVal;
   111     INT retVal;
   111 
   112 
   112     func = (WINAPI_intFUNC) __INST(code_);
   113     func = (WINAPI_intFUNC) __INST(code_);
   113     if (func) {
   114     if (func) {
   131 
   132 
   132      DANGER alert: This is an unprotected low-level entry.
   133      DANGER alert: This is an unprotected low-level entry.
   133      Not for normal application usage.
   134      Not for normal application usage.
   134     "
   135     "
   135 %{
   136 %{
       
   137     INT convertST_to_C();
   136     WINAPI_intFUNC func;
   138     WINAPI_intFUNC func;
   137     INT retVal;
   139     INT retVal;
   138 
   140 
   139     func = (WINAPI_intFUNC) __INST(code_);
   141     func = (WINAPI_intFUNC) __INST(code_);
   140     if (func) {
   142     if (func) {
   157 
   159 
   158      DANGER alert: This is an unprotected low-level entry.
   160      DANGER alert: This is an unprotected low-level entry.
   159      Not for normal application usage.
   161      Not for normal application usage.
   160     "
   162     "
   161 %{
   163 %{
       
   164     INT convertST_to_C();
   162     WINAPI_intFUNC func;
   165     WINAPI_intFUNC func;
   163     INT retVal;
   166     INT retVal;
   164 
   167 
   165     func = (WINAPI_intFUNC) __INST(code_);
   168     func = (WINAPI_intFUNC) __INST(code_);
   166     if (func) {
   169     if (func) {
   183 
   186 
   184      DANGER alert: This is an unprotected low-level entry.
   187      DANGER alert: This is an unprotected low-level entry.
   185      Not for normal application usage.
   188      Not for normal application usage.
   186     "
   189     "
   187 %{
   190 %{
       
   191     INT convertST_to_C();
   188     WINAPI_intFUNC func;
   192     WINAPI_intFUNC func;
   189 #   define NUMARGS 10
   193 #   define NUMARGS 10
   190     INT args[NUMARGS];
   194     INT args[NUMARGS];
   191     INT retVal;
   195     INT retVal;
   192     OBJ *ap;
   196     OBJ *ap;
   193     INT convertST_to_C();
       
   194 
   197 
   195     func = (WINAPI_intFUNC) __INST(code_);
   198     func = (WINAPI_intFUNC) __INST(code_);
   196     if (func && __isArrayLike(argArray)) {
   199     if (func && __isArrayLike(argArray)) {
   197 	int n = __arraySize(argArray);
   200 	int n = __arraySize(argArray);
   198 	int i;
   201 	int i;