[BACK]Return to pvar.c CVS log [TXT][DIR] Up to [local] / OpenXM_contrib2 / asir2000 / parse

Diff for /OpenXM_contrib2/asir2000/parse/pvar.c between version 1.21 and 1.22

version 1.21, 2015/08/08 14:19:42 version 1.22, 2015/08/14 13:51:56
Line 45 
Line 45 
  * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,   * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,
  * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.   * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.
  *   *
  * $OpenXM: OpenXM_contrib2/asir2000/parse/pvar.c,v 1.20 2015/08/06 10:01:53 fujimoto Exp $   * $OpenXM: OpenXM_contrib2/asir2000/parse/pvar.c,v 1.21 2015/08/08 14:19:42 fujimoto Exp $
 */  */
 #include "ca.h"  #include "ca.h"
 #include "parse.h"  #include "parse.h"
Line 177  unsigned int makepvar(char *str)
Line 177  unsigned int makepvar(char *str)
                                 fprintf(stderr,"         `%s' is bound to the global variable\n",str);                                  fprintf(stderr,"         `%s' is bound to the global variable\n",str);
                                 CPVS->va[c].attr = IS_GLOBAL;                                  CPVS->va[c].attr = IS_GLOBAL;
                                 c1 = getpvar(GPVS,str,1); c = PVGLOBAL((unsigned int)c1);                                  c1 = getpvar(GPVS,str,1); c = PVGLOBAL((unsigned int)c1);
 #if defined(__MINGW32__) || defined(__MINGW64__)  
                                 fflush(stderr);  
 #endif  
                         }                          }
                 } else {                  } else {
                         if ( CUR_MODULE ) {                          if ( CUR_MODULE ) {
Line 225  unsigned int makepvar(char *str)
Line 222  unsigned int makepvar(char *str)
                                         fprintf(stderr,                                          fprintf(stderr,
                                                 "Warning: \"%s\", near line %d: undeclared local variable `%s'\n",                                                  "Warning: \"%s\", near line %d: undeclared local variable `%s'\n",
                                                 asir_infile->name,asir_infile->ln,str);                                                  asir_infile->name,asir_infile->ln,str);
 #if defined(__MINGW32__) || defined(__MINGW64__)  
                                         fflush(stderr);  
 #endif  
                                 }                                  }
                                 break;                                  break;
                 }                  }
Line 312  int getpvar(VS pvs,char *str,int searchonly)
Line 306  int getpvar(VS pvs,char *str,int searchonly)
         return i;          return i;
 }  }
   
 #if defined(VISUAL) || defined(__MINGW32__) || defined(__MINGW64__)  #if defined(VISUAL) || defined(__MINGW32__)
 #define PCLOSE _pclose  #define PCLOSE _pclose
 #else  #else
 #define PCLOSE pclose  #define PCLOSE pclose
Line 323  void closecurrentinput()
Line 317  void closecurrentinput()
         if ( asir_infile && !asir_infile->fp )          if ( asir_infile && !asir_infile->fp )
                 return;                  return;
   
 #if defined(VISUAL) || defined(__MINGW32__) || defined(__MINGW64__)  #if defined(VISUAL) || defined(__MINGW32__)
         fclose(asir_infile->fp);          fclose(asir_infile->fp);
         unlink(asir_infile->tname);          unlink(asir_infile->tname);
 #else  #else
Legend:
Removed from v.1.21  
changed lines
  Added in v.1.22
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>