File: do-repeat.stat

package info (click to toggle)
pspp 0.3.0-7
  • links: PTS
  • area: main
  • in suites: woody
  • size: 5,288 kB
  • ctags: 4,679
  • sloc: ansic: 57,209; sh: 2,874; makefile: 405; sed: 93; perl: 18
file content (17 lines) | stat: -rw-r--r-- 420 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
title 'Test DO REPEAT control structure'.

set echo on.
data list file='list.data'/var00001 to var00005 1-5.
string s1 to s5(a8).
vector s=s1 to s5.
do repeat v=var1 to var5/r=region1 to region5/x=0 to 4
   /y=10 to 6/z='abcd',x'010203','alksdj'+'fklasdjfladsf','al''ksj','iouio'
   /longname=var00001 to var00005.
compute v=2**x.
compute v=x.
compute r=v.
compute longname=r.
compute s(x+1)=z.
end repeat print.
list.