View | Details | Raw Unified
Collapse All | Expand All

(-) sqlite-3.4.0/src/tclsqlite.c (-6 / +6 lines)
 Lines 721-735    Link Here  
      ** has no string representation. */
      ** has no string representation. */
      data = Tcl_GetByteArrayFromObj(pVar, &n);
      data = Tcl_GetByteArrayFromObj(pVar, &n);
      sqlite3_result_blob(context, data, n, SQLITE_TRANSIENT);
      sqlite3_result_blob(context, data, n, SQLITE_TRANSIENT);
    }else if( (c=='b' && strcmp(zType,"boolean")==0) ||
 
    }else if( c=='b' && strcmp(zType,"boolean")==0 ){
 
          (c=='i' && strcmp(zType,"int")==0) ){
 

            

        
      Tcl_GetIntFromObj(0, pVar, &n);
      Tcl_GetIntFromObj(0, pVar, &n);

        
      sqlite3_result_int(context, n);
      sqlite3_result_int(context, n);

        
    }else if( c=='d' && strcmp(zType,"double")==0 ){
    }else if( c=='d' && strcmp(zType,"double")==0 ){

        
      double r;
      double r;

        
      Tcl_GetDoubleFromObj(0, pVar, &r);
      Tcl_GetDoubleFromObj(0, pVar, &r);

        
      sqlite3_result_double(context, r);
      sqlite3_result_double(context, r);

            

              
    }else if( c=='w' && strcmp(zType,"wideInt")==0 ){

              
    }else if( (c=='w' && strcmp(zType,"wideInt")==0) ||

            

            

              

              
          (c=='i' && strcmp(zType,"int")==0) ){

            

        
      Tcl_WideInt v;
      Tcl_WideInt v;

        
      Tcl_GetWideIntFromObj(0, pVar, &v);
      Tcl_GetWideIntFromObj(0, pVar, &v);

        
      sqlite3_result_int64(context, v);
      sqlite3_result_int64(context, v);

  

    

    

       Lines 1602-1616
       
    
  Link Here 
    

  

        
              sqlite3_bind_blob(pStmt, i, data, n, SQLITE_STATIC);
              sqlite3_bind_blob(pStmt, i, data, n, SQLITE_STATIC);

        
              Tcl_IncrRefCount(pVar);
              Tcl_IncrRefCount(pVar);

        
              apParm[nParm++] = pVar;
              apParm[nParm++] = pVar;

            

              
            }else if( (c=='b' && strcmp(zType,"boolean")==0) ||

              
            }else if( c=='b' && strcmp(zType,"boolean")==0 ){

            

            

              
                  (c=='i' && strcmp(zType,"int")==0) ){

              

            

        
              Tcl_GetIntFromObj(interp, pVar, &n);
              Tcl_GetIntFromObj(interp, pVar, &n);

        
              sqlite3_bind_int(pStmt, i, n);
              sqlite3_bind_int(pStmt, i, n);

        
            }else if( c=='d' && strcmp(zType,"double")==0 ){
            }else if( c=='d' && strcmp(zType,"double")==0 ){

        
              double r;
              double r;

        
              Tcl_GetDoubleFromObj(interp, pVar, &r);
              Tcl_GetDoubleFromObj(interp, pVar, &r);

        
              sqlite3_bind_double(pStmt, i, r);
              sqlite3_bind_double(pStmt, i, r);

            

              
            }else if( c=='w' && strcmp(zType,"wideInt")==0 ){

              
            }else if( (c=='w' && strcmp(zType,"wideInt")==0) ||

            

            

              

              
                  (c=='i' && strcmp(zType,"int")==0) ){

            

        
              Tcl_WideInt v;
              Tcl_WideInt v;

        
              Tcl_GetWideIntFromObj(interp, pVar, &v);
              Tcl_GetWideIntFromObj(interp, pVar, &v);

        
              sqlite3_bind_int64(pStmt, i, v);
              sqlite3_bind_int64(pStmt, i, v);