Function Single-Match-Fn

Part of:

package cl-perec
( single-match-fn < x > )
Get the single-match function for x,
if it is a symbol that has one.