!******************************************************************************!
! @version: $Id: test_report.mm,v 1.2 2015/05/11 20:22:29 ntn Exp $
!******************************************************************************!
startmacro

  set logfile "temp_report_logfile_^{ENV.PID}.mlog"

  report on "^logfile"
    info    "Line 1"
    warning "Line 2"
    info    "Line 3"
  report off

  assert/text="^reg.main.name: logfile created: ^logfile" logfile FEXISTS
  status logfile size=logSize type=ftype format=format

  assert/text="^reg.main.name: logfile file type is 3000 got ^ftype"  ftype   EQ 3000
  assert/text="^reg.main.name: logfile file format is NH got ^format" format  EQS "NH"
  assert/text="^reg.main.name: logfile file size is 4 got ^logSize"   logSize EQ 4

  erase/all/warn=n logfile

endmacro
