1# -*- tcl -*- textutil::adjust.pcx
2# Syntax of the commands provided by package textutil::adjust.
3#
4# For use by TclDevKit's static syntax checker (v4.1+).
5# See http://www.activestate.com/solutions/tcl/
6# See http://aspn.activestate.com/ASPN/docs/Tcl_Dev_Kit/4.0/Checker.html#pcx_api
7# for the specification of the format of the code in this file.
8#
9
10package require pcx
11pcx::register textutil::adjust
12pcx::tcldep   0.7 needs tcl 8.2
13
14namespace eval ::textutil::adjust {}
15
16#pcx::message FOO {... text ...} type
17#pcx::scan <VERSION> <NAME> <RULE>
18
19pcx::check 0.7 std ::textutil::adjust::adjust \
20    {checkSimpleArgs 1 -1 {
21	checkWord
22	{checkSwitches 1 {
23	    {-full         checkBoolean}
24	    {-hyphenate    checkBoolean}
25	    {-justify      {checkKeyword 1 {left center right}}}
26	    {-length       checkNatNum}
27	    {-strictlength checkBoolean}
28	} {}}
29    }}
30pcx::check 0.7 std ::textutil::adjust::getPredefined \
31    {checkSimpleArgs 1 1 {
32	checkFileName
33    }}
34pcx::check 0.7 std ::textutil::adjust::indent \
35    {checkSimpleArgs 2 3 {
36	checkWord
37	checkWord
38	checkInt
39    }}
40pcx::check 0.7 std ::textutil::adjust::listPredefined \
41    {checkSimpleArgs 0 0 {
42    }}
43pcx::check 0.7 std ::textutil::adjust::readPatterns \
44    {checkSimpleArgs 1 1 {
45	checkFileName
46    }}
47pcx::check 0.7 std ::textutil::adjust::undent \
48    {checkSimpleArgs 1 1 {
49	checkWord
50    }}
51
52# Initialization via pcx::init.
53# Use a ::textutil::adjust::init procedure for non-standard initialization.
54pcx::complete
55