mallocのサイズ指定誤りを修正

[YACASL2.git] / src / exec.c

diff --git a/src/exec.c b/src/exec.c
index 36543e9..caa8588 100644 (file)
--- 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）／タブを表示 */
@@ -263,7 +263,6 @@ void lad()
 /**
  * ADDA命令のテンプレート\n
  * 汎用レジスタrに値valを算術加算
- * \relates exec
  */
 void adda(WORD r, WORD val)
 {
@@ -337,7 +336,6 @@ void suba_r1_r2()
 /**
  * ADDL命令のテンプレート\n
  * 汎用レジスタrに値valを論理加算
- * \relates exec
  */
 void addl(WORD r, WORD val)
 {
@@ -563,8 +561,8 @@ void cpl_r1_r2()
 
 /**
  * SLA命令 - オペランドr,adr,x。語長2\n
- * \relates exec
  * 算術演算なので、第15ビットは送り出されない
+ * \relates exec
  */
 void sla()
 {