: get* ( symbol default -- value ) [ get ] dip or ;