m68k assembler reader: fixed parsing of slash-separated movem/fmovem register lists. only the first register was stored.

git-svn-id: trunk@28174 -

compiler/m68k/ra68kmot.pas

@@ -1509,6 +1509,7 @@ const
                          case actasmtoken of
                           AS_REGISTER:
                             begin
+                              r:=actasmregister;
                               if getregtype(r)=R_ADDRESSREGISTER then
                                 include(addrregset,getsupreg(r))
                               else if getregtype(r)=R_INTREGISTER then