tODE script:
project entry --url=http://gsdevkit.github.io/GsDevKit_home/Seaside31.ston
project clone --https --local Seaside3
project load Seaside3
abort - Abort transaction | |
bedit - batch edit tool | |
begin - Begin transaction | |
break - Method breakpoint management | |
browse - Find and view classes and methods | |
bu - Manage GemStone backups | |
cat - Display contents of node | |
cd - Change node | |
cls - class management | |
commit - Commit transaction |
projectinstall | |
" | |
project install ( <project-name> | [--local|--stone] --url=<project-entry-url> ) | |
" | |
| projectName registration | | |
self | |
getSubcommandOptsMixedLongShort: | |
{#('local' nil #'none'). | |
#('stone' nil #'none'). |
projectentry | |
" | |
project entry --baseline=<project-name> --repo=<project-repo> [--loads=<load-expression>] \ | |
<project-path> | |
entry --config=<project-name> [--version=<project-version>] \ | |
--repo=<project-repo> [--loads=<load-expression>] <project-path> | |
entry --git=<project-name> [--repo=<git-repo-path>] <project-path> | |
entry --url=<url-for-project-entry.ston> <project-path> | |
" |
^ TDProjectSpecEntryDefinition new | |
comment: ''; | |
projectUrl: 'https://github.com/GsDevKit/Seaside31'; | |
baseline: 'Seaside3' | |
repository: 'github://GsDevKit/Seaside31:3.1.?/repository' | |
loads: #('Development' 'Zinc' 'FastCGI' 'Examples'); | |
installScript: 'project clone --https --local Seaside3'; | |
gitCheckout: 'gs_master'; | |
status: #(#'inactive'); | |
locked: false; |
| ar | | |
ar := (BaselineOfSton project version: 'baseline') spec packages map | |
values asArray. | |
ar do: [ :spec | spec instVarNamed: 'project' put: nil ]. | |
STON toStringPretty: ar |
[ :topez :objIn :tokens :command :commandNode | | |
| opts args | | |
"for help: ./resetSHOUTGlobals -h" | |
command | |
getOptsMixedLongShort: {#('help' $h #'none')} | |
optionsAndArguments: [ :options :operands | | |
opts := options. | |
args := operands ]. | |
opts | |
at: 'help' |
TDScriptLeafNode{#name:'resetSHOUTGlobals',#contents:'[ :topez :objIn :tokens :command :commandNode | | |
| opts args | | |
\"for help: ./resetSHOUTGlobals -h\" | |
command | |
getOptsMixedLongShort: {#(\'help\' $h #\'none\')} | |
optionsAndArguments: [ :options :operands | | |
opts := options. | |
args := operands ]. | |
opts | |
at: \'help\' |