! Tests for the IMPORT command when environment variable has dots in them.
!
! Depends on OS environment variable "a.b" being set to the expected value
! which defaults to "123".
!
! 2012-08-10: RHEL6+ tcsh no longer allow invalid characters (including dot) in
!             environment variable names. So this test is no longer valid in RHEL6+.
!             RedHat Bug 436901 - It should not be allowed if environment variable begins with a digit
!             https://bugzilla.redhat.com/show_bug.cgi?id=436901
!             see comment 5 "All variables must begin with a letter (or an underscore),
!                            followed by zero or more alpha-numeric chars or underscores."
! Bug:     1822
! Version: $Id: test_import_dot.mm,v 1.2 2012/08/13 13:28:11 ntn Exp $
!
startmacro S:expect["123"]
  switch INTERACTIVE interAct GET DEF=TRUE SDEF=TRUE
  switch BASELINE    baseline GET DEF=TRUE SDEF=TRUE

  ! NTN this test is interactive (b/c we don't have automatic way to OS environment variable)
  if interAct and baseline then
    import "HOME" myhome
    assert/text="^reg.main.name: import 'HOME' environment variable" myhome REXISTS AND myhome.length() GT 0

    import "a.b" myenv
    assert/text="^reg.main.name: import 'a.b' environment variable = ^expect" myenv REXISTS AND myenv EQS expect
  endif
endmacro

!******************************************************************************!
procedure processException m:emsg
  assert/text="^{reg.main.name}: Unexpected exception: ^emsg.data" FALSE
return
