Bugfix on shift OP

yaglitch.asm

@@ -728,9 +728,7 @@ OP:
 		push rax
 		call OP._pop
 		pop rcx
-		.lshift_loop:
-			shl eax, 1
-			loop .lshift_loop
+		shl eax, cl
 		mov edi, eax
 		call OP._push
 		ret
@@ -739,9 +737,7 @@ OP:
 		push rax
 		call OP._pop
 		pop rcx
-		.rshift_loop:
-			shr eax, 1
-			loop .rshift_loop
+		shr eax, cl
 		mov edi, eax
 		call OP._push
 		ret