how to get a primitive function object

You can use parent.frame() as the pos or envir argument to assign(),
and then the assignment happens in the caller's frame.  And assign()
is also  another way out if you overwrite <- with something that
doesn't work; just call it to reassign base::`<-` to it.  Or just
rm(`<-`) to unhide the original one.