summaryrefslogtreecommitdiffstats
path: root/tcllib/modules/csv/csv.pcx
blob: fee8344d77a3336e66571b1b2a5376e3e7be56ed (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
# -*- tcl -*- csv.pcx
# Syntax of the commands provided by package csv.

# For use by TclDevKit's static syntax checker.
# See http://www.activestate.com/solutions/tcl/
# See http://aspn.activestate.com/ASPN/docs/Tcl_Dev_Kit/4.0/Checker.html#pcx_api
# for the documentation describing the format of the code contained in this file
#

package require pcx
pcx::register csv
pcx::tcldep   0.7 needs tcl 8.3
pcx::tcldep   0.8 needs tcl 8.4

namespace eval ::csv {}

#pcx::message FOO {... text ...} type
#pcx::scan <VERSION> <NAME> <RULE>

pcx::check 0.7 std ::csv::iscomplete \
    {checkSimpleArgs 1 1 {
	checkWord
    }}
pcx::check 0.7 std ::csv::join \
    {checkSimpleArgs 1 3 {
	checkList
	checkWord
	checkWord
    }}
pcx::check 0.8 std ::csv::join \
    {checkSimpleArgs 1 4 {
	checkList
	checkWord
	checkWord
	{checkKeyword 1 {auto always}}
    }}
pcx::check 0.7 std ::csv::joinlist \
    {checkSimpleArgs 1 3 {
	checkList
	checkWord
	checkWord
    }}
pcx::check 0.8 std ::csv::joinlist \
    {checkSimpleArgs 1 4 {
	checkList
	checkWord
	checkWord
	{checkKeyword 1 {auto always}}
    }}
pcx::check 0.7 std ::csv::joinmatrix \
    {checkSimpleArgs 1 3 {
	checkWord
	checkWord
	checkWord
    }}
pcx::check 0.8 std ::csv::joinmatrix \
    {checkSimpleArgs 1 4 {
	checkWord
	checkWord
	checkWord
	{checkKeyword 1 {auto always}}
    }}
pcx::check 0.7 std ::csv::read2matrix \
    {checkSimpleArgs 2 -1 {
	{checkSwitches 1 {
	    -alternate
	} {checkSimpleArgs 1 4 {
	    checkChannelID
	    checkWord
	    checkWord
	    {checkKeyword 1 {none empty auto}}
	}}}
    }}
pcx::check 0.7 std ::csv::read2queue \
    {checkSimpleArgs 2 -1 {
	{checkSwitches 1 {
	    -alternate
	} {checkSimpleArgs 2 3 {
	    checkChannelID
	    checkWord
	    checkWord
	}}}
    }}
pcx::check 0.7 std ::csv::report \
    {checkSimpleArgs 2 3 {
	{checkOption {
	    {printmatrix         {checkSimpleArgs 1 1 {
		checkWord
	    }}}
	    {printmatrix2channel {checkSimpleArgs 2 2 {
		checkWord
		checkChannelID
	    }}}
	} {}}
    }}
pcx::check 0.7 std ::csv::split \
    {checkSimpleArgs 1 -1 {
	{checkSwitches 1 {
	    -alternate
	} {checkSimpleArgs 1 3 {
	    checkWord
	    checkWord
	    checkWord
	}}}
    }}
pcx::check 0.7 std ::csv::split2matrix \
    {checkSimpleArgs 2 -1 {
	{checkSwitches 1 {
	    -alternate
	} {checkSimpleArgs 1 4 {
	    checkChannelID
	    checkWord
	    checkWord
	    {checkKeyword 1 {none empty auto}}
	}}}
    }}
pcx::check 0.7 std ::csv::split2queue \
    {checkSimpleArgs 2 -1 {
	{checkSwitches 1 {
	    -alternate
	} {checkSimpleArgs 2 3 {
	    checkChannelID
	    checkWord
	    checkWord
	}}}
    }}
pcx::check 0.7 std ::csv::writematrix \
    {checkSimpleArgs 2 4 {
	checkWord
	checkChannelID
	checkWord
	checkWord
    }}
pcx::check 0.7 std ::csv::writequeue \
    {checkSimpleArgs 2 4 {
	checkWord
	checkChannelID
	checkWord
	checkWord
    }}

# Initialization via pcx::init.
# Use a ::csv::init procedure for non-standard initialization.
pcx::complete