home *** CD-ROM | disk | FTP | other *** search
/ GEMini Atari / GEMini_Atari_CD-ROM_Walnut_Creek_December_1993.iso / files / program / funnel / test_lt.fws < prev    next >
Encoding:
Text File  |  1993-10-23  |  1.3 KB  |  54 lines
  1. !===========================<Start of test_lt Script>===========================
  2. !
  3. ! Test With Listing File and Typeset File
  4. ! ---------------------------------------
  5. ! Inputs:
  6. !    $1 = Name of the .fw file to be tested (e.g. $1="sc01").
  7. !    $I = Directory containing .fw   files.
  8. !    $A = Directory containing Answer files.
  9. !    $O = Directory to place   Result files.
  10. !    $D = Name of the differences file.
  11. ! Outputs:
  12. !    Listing file.
  13. !    Typeset file.
  14. !    Appendage to differences file.
  15.  
  16. ! Announce this test.
  17. write ""
  18. write ""
  19. writeu "Performing Test $1"
  20.  
  21. ! Delete any previous output files.
  22. eneo $O$1.log
  23. eneo $O$1.lis
  24. eneo $O$1.tex
  25. eneo $O$1.out
  26.  
  27. ! Check input and answer files.
  28. exists $I$1.fw
  29. exists $A$1.lis
  30. exists $A$1.tex
  31. absent $A$1.out
  32.  
  33. ! Clean input and answer files.
  34. fixeols $I$1.fw
  35. fixeols $A$1.lis
  36. fixeols $A$1.tex
  37.  
  38. ! Perform the actual FunnelWeb run.
  39. ! Tolerate means "don't abort on warning, error, or severe".
  40. tolerate
  41. fw $I$1.fw +l$O$1.lis +t$O$1.tex
  42.  
  43. ! Ensure that only a listing and a typeset file were generated.
  44. absent $O$1.log
  45. absent $O$1.out
  46. exists $O$1.lis
  47. exists $O$1.tex
  48.  
  49. ! Compare the results with the answers.
  50. diff $O$1.lis $A$1.lis $D
  51. diff $O$1.tex $A$1.tex $D
  52.  
  53. !============================<End of test_lt Script>============================
  54.