Fix error when compiling define-library form in Chicken

Problem: when running geiser-compile-current-buffer (C-c C-k) on a file using R7RS's define-library form, geiser-chicken--get-module starts an infinite recursion. This happens because the original regular expression contains two groups, but the code only tries to fetch the library name from the first one with "(match-string-no-properties 1)".

Solution: we use the same strategy as in geiser-guile.el, namely we split the regular expression into two separate ones, and check them one by one.