X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fexec.c;h=7e7a43181a1f46cfe0dcdf868e3f4ed8ad55d7c5;hb=c2dfd8587ef6e1981e9896c5352a04d46aa95edf;hp=73b30cd4222f4e3fac65194d33f4c69f9ad8922d;hpb=3482948c47ace39da08b8546f6b466d5b623a877;p=YACASL2.git

diff --git a/src/exec.c b/src/exec.c
index 73b30cd..7e7a431 100644
--- a/src/exec.c
+++ b/src/exec.c
@@ -100,7 +100,7 @@ void svcin()
             break;
         }
         if(sys->cpu->gr[1] + i > execptr->end) {
-            setcerr(208, NULL);    /* SVC input - memory overflow */
+            setcerr(208, "");    /* SVC input - memory overflow */
             break;
         }
         sys->memory[sys->cpu->gr[1]+i] = *(buffer + i);
@@ -119,7 +119,7 @@ void svcout()
 
     for(i = 0; i < sys->memory[sys->cpu->gr[2]]; i++) {
         if(sys->cpu->gr[1] + i > execptr->end) {
-            setcerr(209, NULL);    /* SVC output - memory overflow */
+            setcerr(209, "");    /* SVC output - memory overflow */
             return;
         }
         /* 「文字の組」の符号表に記載された文字と、改行（CR）／タブを表示 */
@@ -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;