home *** CD-ROM | disk | FTP | other *** search
/ Mega Top 1 / os2_top1.zip / os2_top1 / APPS / TEKST / FUNNEL_S / SCRIPTS / TEST_LO2.FWS < prev    next >
Text File  |  1992-05-27  |  1KB  |  60 lines
  1. !===========================<Start of test_lo2 Script>==========================
  2. !
  3. ! Test With Listing File and Two Product Files
  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. !    Product file a.
  14. !    Product file b.
  15. !    Appendage to differences file.
  16.  
  17. ! Announce this test.
  18. write ""
  19. write ""
  20. writeu "Performing Test $1"
  21.  
  22. ! Delete any previous output files.
  23. eneo $O$1.log
  24. eneo $O$1.lis
  25. eneo $O$1.tex
  26. eneo $O$1a.out
  27. eneo $O$1b.out
  28.  
  29. ! Check input and answer files.
  30. exists $I$1.fw
  31. exists $A$1.lis
  32. exists $A$1a.out
  33. exists $A$1b.out
  34. absent $A$1.tex
  35.  
  36. ! Clean input and answer files.
  37. fixeols $I$1.fw
  38. fixeols $A$1.lis
  39. fixeols $A$1a.out
  40. fixeols $A$1b.out
  41.  
  42. ! Perform the actual FunnelWeb run.
  43. ! Tolerate means "don't abort on warning, error, or severe".
  44. tolerate
  45. fw $I$1.fw +l$O$1.lis +o$O$1.out
  46.  
  47. ! Ensure that only a listing and two product files were generated.
  48. absent $O$1.log
  49. absent $O$1.tex
  50. exists $O$1.lis
  51. exists $O$1a.out
  52. exists $O$1b.out
  53.  
  54. ! Compare the results with the answers.
  55. diff $O$1.lis  $A$1.lis  $D
  56. diff $O$1a.out $A$1a.out $D
  57. diff $O$1b.out $A$1b.out $D
  58.  
  59. !============================<End of test_lo2 Script>===========================
  60.