Browse Source

punk::args::helpers::example fix eat your own dogfood documentation

master
Julian Noble 3 weeks ago
parent
commit
eab7d854ef
  1. 7
      src/bootsupport/modules/punk/args-0.2.1.tm
  2. 7
      src/modules/punk/args-999999.0a1.0.tm
  3. 2
      src/project_layouts/custom/_project/punk.basic/src/make.tcl
  4. 7
      src/project_layouts/custom/_project/punk.project-0.1/src/bootsupport/modules/punk/args-0.2.1.tm
  5. 2
      src/project_layouts/custom/_project/punk.project-0.1/src/make.tcl
  6. 7
      src/project_layouts/custom/_project/punk.shell-0.1/src/bootsupport/modules/punk/args-0.2.1.tm
  7. 2
      src/project_layouts/custom/_project/punk.shell-0.1/src/make.tcl
  8. 7
      src/vfs/_vfscommon.vfs/modules/punk/args-0.2.1.tm

7
src/bootsupport/modules/punk/args-0.2.1.tm

@ -310,7 +310,7 @@ tcl::namespace::eval ::punk::args::helpers {
This was generated with code like the following in the punk::args::define script:
${[punk::args::helpers::example -syntax none -tstr 1 {
${[punk::args::helpers::example -syntax none -tstr 0 {
${[example -title "[a+ term-yellow Term-blue] Example 1 [a]" {
#A sample of an example block of text with a garish title and some basic tcl syntax highlighting.
@ -383,10 +383,9 @@ tcl::namespace::eval ::punk::args::helpers {
]
dict for {o v} $optlist {
switch -- $o {
-padright - -syntax - -title - -titlealign - -notstr {}
-padright - -syntax - -title - -titlealign - -tstr {}
default {
punk::args::parse $args withid ::punk::args::helpers::example
return
return "parse error:\n[punk::args::parse $args withid ::punk::args::helpers::example]"
}
}
}

7
src/modules/punk/args-999999.0a1.0.tm

@ -310,7 +310,7 @@ tcl::namespace::eval ::punk::args::helpers {
This was generated with code like the following in the punk::args::define script:
${[punk::args::helpers::example -syntax none -tstr 1 {
${[punk::args::helpers::example -syntax none -tstr 0 {
${[example -title "[a+ term-yellow Term-blue] Example 1 [a]" {
#A sample of an example block of text with a garish title and some basic tcl syntax highlighting.
@ -383,10 +383,9 @@ tcl::namespace::eval ::punk::args::helpers {
]
dict for {o v} $optlist {
switch -- $o {
-padright - -syntax - -title - -titlealign - -notstr {}
-padright - -syntax - -title - -titlealign - -tstr {}
default {
punk::args::parse $args withid ::punk::args::helpers::example
return
return "parse error:\n[punk::args::parse $args withid ::punk::args::helpers::example]"
}
}
}

2
src/project_layouts/custom/_project/punk.basic/src/make.tcl

@ -2471,6 +2471,8 @@ if {[file dirname [info nameofexecutable]] eq $rtfolder && [file isdirectory [in
#exec cp [info nameofexecutable] $rtfolder/[file tail [info nameofexecutable]]_BUILDCOPY
exec cp [info nameofexecutable] $rtfolder/[punkboot::lib::runtime_buildcopyname [info nameofexecutable]]
}
#we need to add the base name of the current exe to the runtimes list because the next section will look for files in the runtime folder
#and won't find the mounted runtime since it's mounted as a directory.
lappend runtimes [file tail [info nameofexecutable]]
}

7
src/project_layouts/custom/_project/punk.project-0.1/src/bootsupport/modules/punk/args-0.2.1.tm

@ -310,7 +310,7 @@ tcl::namespace::eval ::punk::args::helpers {
This was generated with code like the following in the punk::args::define script:
${[punk::args::helpers::example -syntax none -tstr 1 {
${[punk::args::helpers::example -syntax none -tstr 0 {
${[example -title "[a+ term-yellow Term-blue] Example 1 [a]" {
#A sample of an example block of text with a garish title and some basic tcl syntax highlighting.
@ -383,10 +383,9 @@ tcl::namespace::eval ::punk::args::helpers {
]
dict for {o v} $optlist {
switch -- $o {
-padright - -syntax - -title - -titlealign - -notstr {}
-padright - -syntax - -title - -titlealign - -tstr {}
default {
punk::args::parse $args withid ::punk::args::helpers::example
return
return "parse error:\n[punk::args::parse $args withid ::punk::args::helpers::example]"
}
}
}

2
src/project_layouts/custom/_project/punk.project-0.1/src/make.tcl

@ -2471,6 +2471,8 @@ if {[file dirname [info nameofexecutable]] eq $rtfolder && [file isdirectory [in
#exec cp [info nameofexecutable] $rtfolder/[file tail [info nameofexecutable]]_BUILDCOPY
exec cp [info nameofexecutable] $rtfolder/[punkboot::lib::runtime_buildcopyname [info nameofexecutable]]
}
#we need to add the base name of the current exe to the runtimes list because the next section will look for files in the runtime folder
#and won't find the mounted runtime since it's mounted as a directory.
lappend runtimes [file tail [info nameofexecutable]]
}

7
src/project_layouts/custom/_project/punk.shell-0.1/src/bootsupport/modules/punk/args-0.2.1.tm

@ -310,7 +310,7 @@ tcl::namespace::eval ::punk::args::helpers {
This was generated with code like the following in the punk::args::define script:
${[punk::args::helpers::example -syntax none -tstr 1 {
${[punk::args::helpers::example -syntax none -tstr 0 {
${[example -title "[a+ term-yellow Term-blue] Example 1 [a]" {
#A sample of an example block of text with a garish title and some basic tcl syntax highlighting.
@ -383,10 +383,9 @@ tcl::namespace::eval ::punk::args::helpers {
]
dict for {o v} $optlist {
switch -- $o {
-padright - -syntax - -title - -titlealign - -notstr {}
-padright - -syntax - -title - -titlealign - -tstr {}
default {
punk::args::parse $args withid ::punk::args::helpers::example
return
return "parse error:\n[punk::args::parse $args withid ::punk::args::helpers::example]"
}
}
}

2
src/project_layouts/custom/_project/punk.shell-0.1/src/make.tcl

@ -2471,6 +2471,8 @@ if {[file dirname [info nameofexecutable]] eq $rtfolder && [file isdirectory [in
#exec cp [info nameofexecutable] $rtfolder/[file tail [info nameofexecutable]]_BUILDCOPY
exec cp [info nameofexecutable] $rtfolder/[punkboot::lib::runtime_buildcopyname [info nameofexecutable]]
}
#we need to add the base name of the current exe to the runtimes list because the next section will look for files in the runtime folder
#and won't find the mounted runtime since it's mounted as a directory.
lappend runtimes [file tail [info nameofexecutable]]
}

7
src/vfs/_vfscommon.vfs/modules/punk/args-0.2.1.tm

@ -310,7 +310,7 @@ tcl::namespace::eval ::punk::args::helpers {
This was generated with code like the following in the punk::args::define script:
${[punk::args::helpers::example -syntax none -tstr 1 {
${[punk::args::helpers::example -syntax none -tstr 0 {
${[example -title "[a+ term-yellow Term-blue] Example 1 [a]" {
#A sample of an example block of text with a garish title and some basic tcl syntax highlighting.
@ -383,10 +383,9 @@ tcl::namespace::eval ::punk::args::helpers {
]
dict for {o v} $optlist {
switch -- $o {
-padright - -syntax - -title - -titlealign - -notstr {}
-padright - -syntax - -title - -titlealign - -tstr {}
default {
punk::args::parse $args withid ::punk::args::helpers::example
return
return "parse error:\n[punk::args::parse $args withid ::punk::args::helpers::example]"
}
}
}

Loading…
Cancel
Save