]> git.llucax.com Git - z.facultad/75.06/emufs.git/blobdiff - tipo3/emufs.c
* Comento EMUFS para Doxygen
[z.facultad/75.06/emufs.git] / tipo3 / emufs.c
index 4d7409706876cf9b249ad81d182ecb619c811058..ae302fdcea96359b4e9d2c594a1f34d9602b032e 100644 (file)
@@ -7,6 +7,8 @@
 #define EXT_TIPO3_DISP ".fsc"
 #define EXT_TIPO3_IDS ".ids"
 
+char *str_dup(const char *s);
+
 char *str_dup(const char *s)
 {
        char *tmp;
@@ -85,6 +87,8 @@ EMUFS *emufs_abrir(const char *filename)
 
        strcpy(name, filename);
        strcat(name, EXT_TIPO3_DATA);
+
+       /* Trato de determinar el tipo de archivo */
        fp = fopen(name, "r");
        if (fp == NULL) return NULL;
        fread(&tipo, sizeof(char), 1, fp);
@@ -94,7 +98,10 @@ EMUFS *emufs_abrir(const char *filename)
        }
        
        tmp = (EMUFS *)malloc(sizeof(EMUFS));
-       if (tmp == NULL) return NULL;
+       if (tmp == NULL) {
+               fclose(fp);
+               return NULL;
+       }
 
        switch (tipo) {
                case T1: