X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=perl-module%2Ft%2FPspp.t;h=f7ff632cf78fdf4407a420a00db7293b62170b74;hb=c70c924972443e3ec2713e421815cbf959af2582;hp=c2c9dbde0aa3f8e0578f771b1114e9a61ad5e205;hpb=769186f0a30bc22fe6da1b2c4418689e43cfe55d;p=pspp diff --git a/perl-module/t/Pspp.t b/perl-module/t/Pspp.t index c2c9dbde0a..f7ff632cf7 100644 --- a/perl-module/t/Pspp.t +++ b/perl-module/t/Pspp.t @@ -175,9 +175,10 @@ sub run_pspp_syntax_cmp DISPLAY DOCUMENTS. LIST. SYNTAX -Variable,Description,Position -id,Format: F2.0,1 -name,Format: A20,2 +Table: Variables +Name,Position,Label,Measurement Level,Role,Width,Alignment,Print Format,Write Format,Missing Values +id,1,,Scale,Input,8,Right,F2.0,F2.0, +name,2,,Nominal,Input,20,Left,A20,A20, File label: This is the file label @@ -243,27 +244,20 @@ RESULT GET FILE='$tempfile'. DISPLAY DICTIONARY. SYNTAX -Variable,Description,Position -integer,"Label: My Integer -Format: F8.0 -Missing Values: 9; 99 - -Value,Label -0,Zero -1,Unity -2,Duality",1 -string,"Label: My String -Format: A8 -Missing Values: ""this ""; ""that "" - -Value,Label -xx ,foo -yy ,bar",2 -longstring,"Label: My Long String -Format: A9 - -Value,Label -xxx ,xfoo",3 +Table: Variables +Name,Position,Label,Measurement Level,Role,Width,Alignment,Print Format,Write Format,Missing Values +integer,1,My Integer,Scale,Input,8,Right,F8.0,F8.0,9; 99 +string,2,My String,Nominal,Input,8,Left,A8,A8,"""this ""; ""that """ +longstring,3,My Long String,Nominal,Input,9,Left,A9,A9, + +Table: Value Labels +Variable,Value,Label +integer,0,Zero +,1,Unity +,2,Duality +string,xx ,foo +,yy ,bar +longstring,xxx ,xfoo RESULT }