pintos-os.org Git - pspp/blob - tests/language/dictionary/sys-file-info.at

   1 AT_BANNER([SYSFILE INFO])
   2
   3 AT_SETUP([SYSFILE INFO])
   4 AT_DATA([sysfile-info.sps], [dnl
   5 DATA LIST LIST /x * name (a10) .
   6 BEGIN DATA
   7 1 one
   8 2 two
   9 3 three
  10 END DATA.
  11 SAVE OUTFILE='pro.sav'.
  12
  13 sysfile info file='pro.sav'.
  14 ])
  15 AT_CHECK([pspp -o pspp.csv sysfile-info.sps])
  16 AT_CHECK(
  17   [sed -e '/^Created:,/d' \
  18        -e '/^Endian:,/d' \
  19        -e '/^Integer Format:,/d' \
  20        -e '/^Real Format:,/d' \
  21        -e '/^Encoding:,/d' pspp.csv],
  22   [0], [dnl
  23 Table: Reading free-form data from INLINE.
  24 Variable,Format
  25 x,F8.0
  26 name,A10
  27
  28 File:,pro.sav
  29 Label:,No label.
  30 Variables:,2
  31 Cases:,3
  32 Type:,SPSS System File
  33 Weight:,Not weighted.
  34 Compression:,SAV
  35
  36 Variable,Description,Position
  37 x,"Format: F8.2
  38 Measure: Scale
  39 Role: Input
  40 Display Alignment: Right
  41 Display Width: 8",1
  42 name,"Format: A10
  43 Measure: Nominal
  44 Role: Input
  45 Display Alignment: Left
  46 Display Width: 10",2
  47 ])
  48 AT_CLEANUP
  49
  50 AT_BANNER([DISPLAY])
  51
  52 dnl DISPLAY DOCUMENTS is tested with commands for documents.
  53
  54 AT_SETUP([DISPLAY FILE LABEL])
  55 AT_DATA([display.sps], [dnl
  56 DATA LIST LIST NOTABLE /x * name (a10) .
  57
  58 DISPLAY FILE LABEL.
  59
  60 FILE LABEL 'foo bar baz quux'.
  61 DISPLAY FILE LABEL.
  62 ])
  63 AT_CHECK([pspp -O format=csv display.sps], [0], [dnl
  64 The active dataset does not have a file label.
  65
  66 File label: foo bar baz quux
  67 ])
  68 AT_CLEANUP
  69
  70 dnl DISPLAY VECTORS is tested with commands for vectors.
  71
  72 dnl DISPLAY ATTRIBUTES and @ATTRIBUTES are tested with commands for attributes.
  73
  74 AT_SETUP([DISPLAY SCRATCH])
  75 AT_DATA([sysfile-info.sps], [dnl
  76 DATA LIST LIST NOTABLE /x * name (a10) .
  77 DISPLAY SCRATCH.
  78 COMPUTE #x=0.
  79 DISPLAY SCRATCH.
  80 ])
  81 AT_CHECK([pspp -O format=csv sysfile-info.sps], [0], [dnl
  82 sysfile-info.sps:2: warning: DISPLAY: No variables to display.
  83
  84 Variable
  85 #x
  86 ])
  87 AT_CLEANUP
  88
  89 AT_SETUP([DISPLAY INDEX])
  90 AT_DATA([sysfile-info.sps], [dnl
  91 DATA LIST LIST NOTABLE /x * name (a10) .
  92 DISPLAY INDEX.
  93 ])
  94 AT_CHECK([pspp -O format=csv sysfile-info.sps], [0], [dnl
  95 Variable,Position
  96 x,1
  97 name,2
  98 ])
  99 AT_CLEANUP
 100
 101 AT_SETUP([DISPLAY NAMES])
 102 AT_DATA([sysfile-info.sps], [dnl
 103 DATA LIST LIST NOTABLE /x * name (a10) .
 104 DISPLAY NAMES.
 105 ])
 106 AT_CHECK([pspp -O format=csv sysfile-info.sps], [0], [dnl
 107 Variable
 108 x
 109 name
 110 ])
 111 AT_CLEANUP
 112
 113 AT_SETUP([DISPLAY LABELS])
 114 AT_DATA([sysfile-info.sps], [dnl
 115 DATA LIST LIST NOTABLE /x * name (a10) .
 116 VARIABLE LABEL x 'variable one' name 'variable two'.
 117 VALUE LABEL x 1 'asdf' 2 'jkl;'.
 118 DISPLAY LABELS.
 119 ])
 120 AT_CHECK([pspp -O format=csv sysfile-info.sps], [0], [dnl
 121 Variable,Label,Position
 122 x,variable one,1
 123 name,variable two,2
 124 ])
 125 AT_CLEANUP
 126
 127 dnl DISPLAY VARIABLES Is tested in multiple places.