m68k: restored orglen variable to g_concatcopy which was actually used, but still got removed in r28072

git-svn-id: trunk@28080 -

compiler/m68k/cgcpu.pas

@@ -1507,8 +1507,10 @@ unit cgcpu;
          hl : tasmlabel;
          srcref,dstref : treference;
          alignsize : tcgsize;
+         orglen : tcgint;
       begin
          hregister := getintregister(list,OS_INT);
+         orglen:=len;
 
          { from 12 bytes movs is being used }
          if ((len<=8) or (not(cs_opt_size in current_settings.optimizerswitches) and (len<=12))) then