Replaced CLIM3-EXT:SET-DEPTH by (SETF CLIM3-EXT:DEPTH).