extra/mason/common/common-tests.factor

   1 IN: mason.common.tests
   2 USING: prettyprint mason.common mason.config
   3 namespaces calendar tools.test io.files io.files.temp io.encodings.utf8 ;
   4
   5 [ "00:01:01" ] [ 61000 milli-seconds>time ] unit-test
   6
   7 [ "/home/bobby/builds/factor" ] [
   8     [
   9         "/home/bobby/builds" builds-dir set
  10         builds/factor
  11     ] with-scope
  12 ] unit-test
  13
  14 [ "/home/bobby/builds/2008-09-11-12-23" ] [
  15     [
  16         "/home/bobby/builds" builds-dir set
  17         T{ timestamp
  18             { year 2008 }
  19             { month 9 }
  20             { day 11 }
  21             { hour 12 }
  22             { minute 23 }
  23         } datestamp stamp set
  24         build-dir
  25     ] with-scope
  26 ] unit-test
  27
  28 [ ] [ "empty-test" temp-file utf8 [ ] with-file-writer ] unit-test
  29
  30 [ "empty-test" temp-file eval-file ] must-fail
  31
  32 [ ] [ "eval-file-test" temp-file utf8 [ { 1 2 3 } . ] with-file-writer ] unit-test
  33
  34 [ { 1 2 3 } ] [ "eval-file-test" temp-file eval-file ] unit-test