optimize (x>>c)<<c
Merge pull request #2355 from WalterBright/shlshr

optimize (x>>c)<<c
Merge remote-tracking branch 'upstream/master'