home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / BATUTL / EXT_BAT.ZIP / SIZER.DOC < prev    next >
Encoding:
Text File  |  1983-12-15  |  3.1 KB  |  89 lines
  1.  
  2.  
  3. This program tests the size of a file and sets an errorlevel
  4. based on it's findings.  Currently, it is set up for the file
  5. ERRLOG and expects it to be 115 bytes long.  If it does not find
  6. the file or it is not 115 bytes big, an errorlevel 1 is returned
  7. (the file is assumed to be in the current working directory).
  8. Otherwise, errorlevel 0 is returned.  This program requires DOS
  9. 2.0.
  10.  
  11. This program is currently set up for the PASCAL compiler.  If PAS1
  12. goes OK, the following output is generated:
  13.  
  14.   IBM Personal Computer Pascal Compiler
  15.   Version 1.00 (C)Copyright IBM Corp 1981
  16.    Pass One    No Errors Detected.
  17.  
  18. which is exactly 115 bytes big when redirected to a disk file.
  19.  
  20. The output of IBM Basic Compiler is 211 bytes.
  21. The output of MS Pascal Compiler is  98 bytes.
  22.  
  23. To use this program with the other compilers/assemblers, follow these
  24. steps.
  25.  
  26.    1. Run the compiler/assembler on a known good program and redirect
  27.       the output to the disk file ERRLOG.
  28.    2. Do a "DIR ERRLOG" and look at the size of the file.
  29.    3. Put the file size in the EQUATE section below in SIZELO (SIZEHI
  30.       should always be zero unless your compiler generates more than
  31.       64k of messages!).
  32.    4. If you like, change the FILENAME DB statement near the end of
  33.       this program to a filename of your liking.
  34.    5. Assemble and link as follows:
  35.      MASM SIZER,,;
  36.      LINK SIZER;               (Ignore "NO STACK" message)
  37.      EXE2BIN SIZER.EXE SIZER.COM
  38.    6. Have fun!
  39.  
  40. One note for you PASCAL fans: PAS2 does not like to have his output
  41. redirected -- it hangs the system.  I haven't investigated it so I
  42. don't know the reason why.  If someone figures out why, please pass
  43. it along.
  44.  
  45. Usage:
  46.       echo off
  47.       cls
  48.       echo Compiling %1 .....
  49.       pas1 %1,,; > errlog
  50.       SIZER
  51.       if errorlevel 1 goto error
  52.       echo PAS1 ok.  Starting PAS2....
  53.       pas2
  54.       goto end
  55.       :error
  56.       edit %1.pas
  57.       :end
  58.       echo on
  59.  
  60. Copyright (C) 1983  Tony Alan Rhea
  61. This program may be copied and distributed for personal use
  62. but not for profit provided this notice is included.  Author makes
  63. no warranty, expressed or implied, as to the correct nature and
  64. operation of this software.
  65.  
  66.  
  67. You may make and distribute as many copies of this program as you wish
  68. for your PERSONAL use only ( NOT for business purposes, please! ).
  69. Feel free to modify, mutilate, or adulterate this program.  If you come
  70. up with an bug or improvement, please let me know by writing me at this
  71. address:
  72.     Tony A. Rhea
  73.     1030 Ivy Lane
  74.     Cary, NC  27511
  75. If you do modify it, please give me credit in the program.  This helps
  76. to preserve my ego and increase my fame (but, unfortunately, NOT my
  77. financial status).  Also, I would appreciate a copy of the modified
  78. version, preferably on disk (I'll be happy to return your diskette).
  79.  
  80. If you like this program ( or HATE it ), please let me know.  Drop me
  81. a line at the address given above.
  82.  
  83. This program has been submitted for publication in PC-WORLD magazine.
  84.  
  85.  
  86.   Revision history:
  87.      rev 1.0  11/14/83                   { original release }
  88.  
  89.