X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=src%2Fexec.c;h=8df0765e38c52da163d25e89fae000bd40671cab;hb=5fe729a05aa92da7181361122cea17e77bb8158a;hp=5d4e191f340a9a9c9cf8243cb2ce67b1b2173182;hpb=875ffa04ad421b5cac1ce48e8bf2090aefb009c9;p=YACASL2.git

diff --git a/src/exec.c b/src/exec.c
index 5d4e191..8df0765 100644
--- a/src/exec.c
+++ b/src/exec.c
@@ -215,25 +215,6 @@ void addcerrlist_exec()
     addcerrlist(ARRAYSIZE(cerr_exec), cerr_exec);
 }
 
-WORD loadassemble(const char *file, WORD start)
-{
-    FILE *fp = NULL;
-    WORD end = 0;
-
-    assert(file != NULL);
-    if((fp = fopen(file, "rb")) == NULL) {
-        perror(file);
-        return 0;
-    }
-    end = start + fread(sys->memory + start, sizeof(WORD), sys->memsize - start, fp);
-    if(end == sys->memsize) {
-        setcerr(210, file);    /* load - memory overflow */
-        fprintf(stderr, "Load error - %d: %s\n", cerr->num, cerr->msg);
-    }
-    fclose(fp);
-    return end;
-}
-
 void nop()
 {
     sys->cpu->pr += 1;
@@ -316,10 +297,11 @@ void suba_r1_r2()
 
 void addl_gr(WORD r, WORD val, bool add)
 {
-    unsigned long o, s;
+    unsigned long o = 0;
+    unsigned long s = 0;
 
     o = sys->cpu->gr[r];
-    sys->cpu->fr = 0x0;    /* flag initialize */
+    sys->cpu->fr = 0;    /* flag initialize */
 
     if(add == true) {
         s = o + val;