Deadlock in save-object
When running through the README of Netfarm I had an issue running
;; Preamble
(defvar *system*
(make-instance 'netfarm-server:memory-system))
(decentralise-system:start-system *system*)
(defparameter *client*
(decentralise-client:connect-to-system *system*))
(defclass foo-class ()
((a :initarg :a)
(b :initarg :b)
(c :initarg :c))
(:metaclass netfarm:netfarm-class))
;; Issue call
(netfarm-client:save-object *client* (make-instance 'foo-class))
It seems that the requests made via save-single-object* exhibits the behavior.
NETFARM-PLAYGROUND> (netfarm-client:save-object *client* (make-instance 'foo-class))
; Returning var 8 of frame 6
(#<DECENTRALISE-CLIENT:FUNCTIONAL-ACTION #x302004ACE5AD>
#<DECENTRALISE-CLIENT:FUNCTIONAL-ACTION #x302004ACE6FD>)
NETFARM-PLAYGROUND>
; Evaluation aborted on T
NETFARM-PLAYGROUND> (decentralise-client:run (car #v207)
:timeout 10)