add-to-relation

Just to give more insight.  The following patch gets rid of the error,
but I confess I have a too vague idea of contexts in this context
(pardon the pun) to know whether or not it may make any sense.


Index: objects.lisp
===================================================================
RCS file: /cvs/usql/sql/objects.lisp,v
retrieving revision 1.123
diff -c -r1.123 objects.lisp
*** objects.lisp	2002/11/04 18:33:08	1.123
--- objects.lisp	2002/11/06 14:17:57
***************
*** 339,345 ****
                  (eql slot-kind :virtual)
                  *db-deserializing*)
        ;; Notate slot-value change in editing context.
!       (ec-edit instance *default-editing-context*))
      (call-next-method)))
  
  (defun synchronize-keys (src srckey dest destkey)
--- 339,346 ----
                  (eql slot-kind :virtual)
                  *db-deserializing*)
        ;; Notate slot-value change in editing context.
!       (when *default-editing-context*
! 	(ec-edit instance *default-editing-context*)))
      (call-next-method)))
  
  (defun synchronize-keys (src srckey dest destkey)

-- 
walter pelissero
http://www.pelissero.org