Oracle Backend on SBCL

Hi,

I've been banging my head all morning trying to get CLSQL working with
Oracle using SBCL 0.9.3 on Linux/x86 with Oracle 10i.  Everything
works just fine using CMUCL and Lispworks on Linux, and on Mac OS X
using OpenMCL, but using SBCL (with and without :SB-THREAD), I hit a
SIGSEGV within OCI while trying to connect.  Any ideas?

* (clsql:connect "xxx/xxx@xxx")
  0: (CLSQL-ORACLE::OCI-ENV-CREATE
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X0827EF18 :TYPE (* (* T))>
      0
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X00000000 :TYPE (* T)>
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X00000000 :TYPE (* T)>
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X00000000 :TYPE (* T)>
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X00000000 :TYPE (* T)>
      0
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X00000000 :TYPE (* (* T))>)
  0: CLSQL-ORACLE::OCI-ENV-CREATE returned 0
  0: (CLSQL-ORACLE::OCI-HANDLE-ALLOC
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X08294128 :TYPE (* T)>
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X0827EF28 :TYPE (* (* T))>
      2
      0
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X00000000 :TYPE (* (* T))>)
  0: CLSQL-ORACLE::OCI-HANDLE-ALLOC returned 0
  0: (CLSQL-ORACLE::OCI-HANDLE-ALLOC
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X08294128 :TYPE (* T)>
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X0827EF48 :TYPE (* (* T))>
      8
      0
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X00000000 :TYPE (* (* T))>)
  0: CLSQL-ORACLE::OCI-HANDLE-ALLOC returned 0
  0: (CLSQL-ORACLE::OCI-HANDLE-ALLOC
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X08294128 :TYPE (* T)>
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X0827EF38 :TYPE (* (* T))>
      3
      0
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X00000000 :TYPE (* (* T))>)
  0: CLSQL-ORACLE::OCI-HANDLE-ALLOC returned 0
  0: (CLSQL-ORACLE::OCI-LOGON
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X08294128 :TYPE (* T)>
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X0829933C :TYPE (* T)>
      #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X0827EF38 :TYPE (* (* T))>
      "xxx"
      5
      "xxx"
      5
      "xxx"
      5
      :DATABASE
      #<CLSQL-ORACLE:ORACLE-DATABASE xxx/xxx CLOSED {9E848D1}>)

debugger invoked on a SB-KERNEL::MEMORY-FAULT-ERROR in thread #<THREAD "initial thread" {9004391}>:
  memory fault

Type HELP for debugger help, or (SB-EXT:QUIT) to exit from SBCL.

restarts (invokable by number or by possibly-abbreviated name):
  0: [ABORT] Exit debugger, returning to top level.

(SB-KERNEL::MEMORY-FAULT-ERROR)
0] back

0: (SB-KERNEL::MEMORY-FAULT-ERROR)
1: ("foreign function: call_into_lisp")
2: ("foreign function: post_signal_tramp")
3: ("foreign function: kpuatch")
4: ("foreign function: kpulon")
5: ("foreign function: OCILogon")
6: (CLSQL-ORACLE::%OCI-LOGON
    #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X08294128 :TYPE (* T)>
    #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X0829933C :TYPE (* T)>
    #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X0827EF38 :TYPE (* (* T))>
    "xxx"
    5
    "xxx"
    5
    "xxx"
    5)
7: (CLSQL-ORACLE::OCI-LOGON
    #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X08294128 :TYPE (* T)>
    #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X0829933C :TYPE (* T)>
    #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X0827EF38 :TYPE (* (* T))>
    "xxx"
    5
    "xxx"
    5
    "xxx"
    5
    :DATABASE
    #<CLSQL-ORACLE:ORACLE-DATABASE xxx/xxx CLOSED {9E848D1}>
    :NULLS-OK
    NIL)
8: (SB-DEBUG::TRACE-CALL #<SB-DEBUG::TRACE-INFO CLSQL-ORACLE::OCI-LOGON>)
9: (SB-INT:EVAL-IN-LEXENV
    (SB-DEBUG::TRACE-CALL '#<SB-DEBUG::TRACE-INFO CLSQL-ORACLE::OCI-LOGON>)
    #<NULL-LEXENV>)
10: (SB-IMPL::ENCAPSULATION
     #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X08294128 :TYPE (* T)>
     #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X0829933C :TYPE (* T)>
     #<SB-ALIEN-INTERNALS:ALIEN-VALUE :SAP #X0827EF38 :TYPE (* (* T))>
     "xxx"
     5
     "xxx"
     5
     5
     :DATABASE
     #<CLSQL-ORACLE:ORACLE-DATABASE xxx/xxx CLOSED {9E848D1}>)
11: ((SB-PCL::FAST-METHOD CLSQL-SYS:DATABASE-CONNECT (T (EQL :ORACLE)))
     #<unavailable argument>
     #<unavailable argument>
     ("xxx" "xxx" "xxx")
     :ORACLE)
12: (CLSQL-SYS:CONNECT
     ("xxx" "xxx" "xxx")
     :IF-EXISTS
     NIL
     :MAKE-DEFAULT
     T
     :POOL
     NIL
     :DATABASE-TYPE
     NIL)
13: (SB-INT:EVAL-IN-LEXENV
     (CLSQL-SYS:CONNECT "xxx/xxx@xxx")
     #<NULL-LEXENV>)
14: (INTERACTIVE-EVAL (CLSQL-SYS:CONNECT "xxx/xxx@xxx"))
15: (SB-IMPL::REPL-FUN NIL)
16: ((LAMBDA ()))
17: ((LAMBDA ()))
18: (SB-IMPL::%WITH-REBOUND-IO-SYNTAX #<CLOSURE (LAMBDA #) {949669D}>)
19: (SB-IMPL::TOPLEVEL-REPL NIL)
20: (SB-IMPL::TOPLEVEL-INIT)
21: ((FLET SB-IMPL::RESTART-LISP))

0]