* elisp/JCregexps.el: essai d'utilisation de (while (re-search-forward))...