X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=src%2Fexec.c;h=7e7a43181a1f46cfe0dcdf868e3f4ed8ad55d7c5;hb=68cacd2921a4b0d8783a4180f9660b567c37359a;hp=caa85881b24b1d3973283b0893d82f9f1d2a72b4;hpb=d28cabe954c1f93dee3cb1b100e614e985a74cdb;p=YACASL2.git

diff --git a/src/exec.c b/src/exec.c
index caa8588..7e7a431 100644
--- a/src/exec.c
+++ b/src/exec.c
@@ -523,8 +523,6 @@ void cpa_r1_r2()
  */
 void cpl(WORD r, WORD val)
 {
-    WORD w[1];
-    w[0] = sys->memory[sys->cpu->pr];
     sys->cpu->fr = 0x0;
     if(sys->cpu->gr[r] < val) {
         sys->cpu->fr = SF;