Revision 1840 trunk/src/linad99/gradstak.cpp

gradstak.cpp (revision 1840)
369 369
  #if defined (__TURBOC__)
370 370
   _GRADFILE_PTR1=open(gradfile_name1, O_RDWR | O_CREAT |
371 371
       O_TRUNC | O_BINARY, S_IREAD | S_IWRITE);
372

  
373 372
   _VARSSAV_PTR=open(var_store_file_name, O_RDWR | O_CREAT |
374 373
       O_TRUNC | O_BINARY, S_IREAD | S_IWRITE);
375

  
376 374
  #elif defined (__ZTC__)
377 375
    _GRADFILE_PTR1=open(gradfile_name1, O_RDWR | O_CREAT |
378 376
      O_TRUNC , S_IREAD | S_IWRITE);
379 377
    _VARSSAV_PTR=open(var_store_file_name, O_RDWR | O_CREAT
380 378
      | O_TRUNC,  S_IREAD | S_IWRITE);
381

  
382 379
  #elif defined (__NDPX__)
383 380
    _GRADFILE_PTR1=creat(gradfile_name1, O_RDWR);
384 381
     _VARSSAV_PTR=creat(var_store_file_name, O_RDWR);
385

  
386
  #elif ( defined ( __SUN__) ||  defined ( __GNU__))
387

  
388
    _GRADFILE_PTR1=open(gradfile_name1, O_RDWR | O_CREAT | O_TRUNC |
389
      O_BINARY , 0777);
390
    _VARSSAV_PTR=open(var_store_file_name, O_RDWR |
391
      O_CREAT | O_TRUNC | O_BINARY, 0777);
392

  
393
  #elif (defined (__GNUDOS__) && !defined(__GNU__))
394
    _GRADFILE_PTR1=open(gradfile_name1, O_RDWR | O_CREAT | O_TRUNC |
395
      O_BINARY ,   0777);
396
    _VARSSAV_PTR=open(var_store_file_name, O_RDWR |
397
      O_CREAT | O_TRUNC | O_BINARY, 0777);
398

  
399
  #elif defined (_MSC_VER)
400
    _GRADFILE_PTR1=open(gradfile_name1, O_RDWR | O_CREAT | O_TRUNC |
401
      O_BINARY ,   0777);
402
    _VARSSAV_PTR=open(var_store_file_name, O_RDWR |
403
      O_CREAT | O_TRUNC | O_BINARY, 0777);
404

  
405 382
  #elif defined (__WAT32__)
406 383
   _GRADFILE_PTR1=open(gradfile_name1, O_RDWR | O_CREAT |
407 384
       O_TRUNC | O_BINARY, S_IREAD | S_IWRITE);
408

  
409 385
   _VARSSAV_PTR=open(var_store_file_name, O_RDWR | O_CREAT |
410 386
       O_TRUNC | O_BINARY, S_IREAD | S_IWRITE);
411 387
  #else
412
    xxxxx   // need to define this for thei compiler!
388
    _GRADFILE_PTR1=open(gradfile_name1, O_RDWR | O_CREAT | O_TRUNC |
389
      O_BINARY , 0777);
390
    _VARSSAV_PTR=open(var_store_file_name, O_RDWR |
391
      O_CREAT | O_TRUNC | O_BINARY, 0777);
413 392
  #endif
414 393

  
415 394
  if (_GRADFILE_PTR1 == -1)
......
434 413
      S_IREAD | S_IWRITE);
435 414
  #elif defined (__NDPX__)
436 415
    _GRADFILE_PTR2=creat(gradfile_name2, O_RDWR);
437

  
438
  #elif ( defined (__SUN__) ||  defined (__GNU__) )
439
    _GRADFILE_PTR2=open(gradfile_name2, O_RDWR | O_CREAT | O_TRUNC |
440
      O_BINARY , 0777);
441

  
442
  #elif (defined (__GNUDOS__) && !defined (__GNU__))
443
    _GRADFILE_PTR2=open(gradfile_name2, O_RDWR | O_CREAT | O_TRUNC |
444
      O_BINARY , 0777);
445

  
446 416
  #elif defined (_MSC_VER)
447 417
    _GRADFILE_PTR2=open(gradfile_name2, O_RDWR | O_CREAT | O_TRUNC |
448 418
      O_BINARY, S_IREAD | S_IWRITE);
449

  
450 419
  #elif defined (__WAT32__)
451 420
    _GRADFILE_PTR2=open(gradfile_name2, O_RDWR | O_CREAT | O_TRUNC |
452 421
      O_BINARY, S_IREAD | S_IWRITE);
453 422
  #else
454
    xxxx  // need to define this for this compiler
423
    _GRADFILE_PTR2=open(gradfile_name2, O_RDWR | O_CREAT | O_TRUNC |
424
      O_BINARY , 0777);
455 425
  #endif
456 426

  
457 427
  if (_GRADFILE_PTR2 == -1)

Also available in: Unified diff