Save the state of the wallet to a file.
(save-stat stat state) → state
The name suffix
serialize-write throws a hard error upon failure. This may acceptable if the shell script that calls the wallet can catch that and turn into a more user-oriented error message.
Function:
(defun save-stat (stat state) (declare (xargs :stobjs (state))) (declare (xargs :guard (statp stat))) (declare (xargs :guard (stat-wfp stat))) (let ((__function__ 'save-stat)) (declare (ignorable __function__)) (serialize-write *stat-filepath* stat)))