PERL   129
test
Guest on 25th August 2022 01:54:36 PM


  1. #!/bin/sh
  2.  
  3. #  Smalltag evaluation
  4. #    Alex Krotov (alexk@dcs.shef.ac.uk)
  5. #
  6. #    slightly changed by Tomas By
  7. #
  8. #  eval
  9. #    
  10. #    Given a sample, a set of rules and lexicon
  11. #    1.  Runs smalltag
  12. #    2.  Evaluates the output agains the bnc sample
  13. #
  14. #
  15. #  usage: test ruleset file
  16. #
  17. #   assuming eval/file.out contains smalltag output,
  18. #   eval/file.bnc contains the BNC source
  19. #
  20.  
  21. ./smalltag $1 $2.txt
  22. rm $2.log
  23. ./one-line < $2.out > $2.stag
  24. ./comp-mark $2.stag $2.bnc $2.eval > $2.cmp
  25. cat $2.cmp
  26. rm $2.stag
Raw Paste

Login or Register to edit or fork this paste. It's free.