! Runs the Fortran tests for XBC for M$*PICK calls, i.e. CMDLINE support.
!
! author:  J. Czechowski IV / Neon Ngo
! version: $Id: test_picks.mm,v 1.1 2008/10/13 19:02:09 ntn Exp $
!
startmacro
  ! MYVAL is used with M$UPICK test case
  set L:MYVAL 42
  
  nxm.xbc.host.test_picks/stat=status ,, 2006:01:09::22:13:49.987 cone5000 &
    MYVAL "MYSTR" ,,, "F" "T"  1854642006.813 (1854642006,0.123456789) 1846621740|0.1 1846621740.5|0.7
  
  assert/text="All M$*PICK (retrieving arguments from command line) tests." &
    status rexists and ^status eqs "PASS"
  
endmacro
