Changeset 14749 in project


Ignore:
Timestamp:
05/22/09 17:44:56 (10 years ago)
Author:
sjamaan
Message:

Remove some bangs on location names in error calls

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/4/postgresql/trunk/postgresql.scm

    r14726 r14749  
    391391       (pg-connection-ptr conn) query)
    392392      (collect-results conn)
    393       (postgresql-error 'exec-query!
     393      (postgresql-error 'exec-simple-queries
    394394                        (conc "Unable to send query to server. "
    395395                              (PQerrorMessage (pg-connection-ptr conn)))
     
    405405                         (not (sql-null? (car p))))
    406406                (postgresql-error
    407                  'exec-query! (sprintf "Param value is not a string, sql-null or blob: ~S" p)
     407                 'exec-query (sprintf "Param value is not a string, sql-null or blob: ~S" p)
    408408                 conn query params format))
    409409              (when (not (integer? (cdr p)))
    410410                (postgresql-error
    411                  'exec-query! (sprintf "Param type is not an oid: ~S" p)
     411                 'exec-query (sprintf "Param type is not an oid: ~S" p)
    412412                 conn query params format))
    413413              (if (sql-null? (car p)) (cons #f (cdr p)) p))) params))
     
    465465                   (length params) params (if (eq? 'binary format) 1 0))
    466466       (car (collect-results conn)) ;; assumed to always return one result...
    467        (postgresql-error 'exec-query!
     467       (postgresql-error 'exec-query
    468468                         (conc "Unable to send query to server. "
    469469                               (PQerrorMessage (pg-connection-ptr conn)))
Note: See TracChangeset for help on using the changeset viewer.