Skip to content

Instantly share code, notes, and snippets.

🎯
Rowan

Dale Henrichs dalehenrich

🎯
Rowan
Block or report user

Report or block dalehenrich

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
View bug.ston
TDScriptLeafNode{#name:'bug',#contents:'[ :topez :objIn :tokens :command |
| opts args |
\"for help: ./bug -h\"
command
getOptsMixedLongShort:
{#(\'help\' $h #\'none\').
#(\'boom\' nil #\'none\').
#(\'clean\' nil #\'none\').
#(\'create\' nil #\'none\').
#(\'install\' nil #\'none\')}
View bug.st
[ :topez :objIn :tokens :command |
| opts args |
"for help: ./bug -h"
command
getOptsMixedLongShort:
{#('help' $h #'none').
#('boom' nil #'none').
#('clean' nil #'none').
#('create' nil #'none').
#('install' nil #'none')}
View TheLightAtTheEndOfTheTunnel_2.md

The Light At The End Of The Tunnel: Announcing the release of GsDevKit_home and tODE

  1. GsDevKit_home & tODE provides a complete Smalltalk development environment for GemStone/S 64
    • easy GsDevKit installation:

      git clone https://github.com/GsDevKit/GsDevKit_home.git
      cd GsDevKit_home
      export GS_HOME=`pwd`
      export PATH=$GS_HOME/bin:$PATH
      
View TheLightAtTheEndOfTheTunnel_1.md

The Light At The End Of The Tunnel: Announcing the release of GsDevKit_home and tODE

GsDevKit_home

  1. GsDevKit_home development kit for GemStone/S 64, provides a framework of Bash scripts and directory structure for working with a collection of multiple stones.
  • Bash scripts
    • createStone
    • deleteStone
    • startStone
    • stopStone
View TheLightAtTheEndOfTheTunnel_0.md
View projectList.txt
|Foo| 5fc250e [master] filetree://$GS_HOME/shared/repos/Foo/repository
GsDevKit_home 4c94c05 [dev] $GS_HOME
|FileTree| 263ef78 [gemstone2.4] filetree:///export/foos1/users/dhenrich/dev/_home/shared/repos/filetree/repository
|GLASS1| 4887ed9 [master] filetree:///export/foos1/users/dhenrich/dev/_home/shared/repos/glass/repository
Gofer 1.0.5.4 [release] http://seaside.gemtalksystems.com/ss/metacello
|Grease| b674ad0 [master] filetree:///export/foos1/users/dhenrich/dev/_home/shared/repos/Grease/repository
|Metacello| 02c2382 [master] filetree:///export/foos1/users/dhenrich/dev/_home/shared/repos/metacello-work/repository
|RB| d6639e0 [dev] filetree:///export/foos1/users/dhenrich/dev/_home/shared/repos/rb/repository
|Ston| 25aace1 [gemstone] filetree:///export/foos1/users/dhenrich/dev/_home/shared/repos/ston/repository
|Tode| daf6
View projectCommandSummary.txt
project - Metacello project management support.
project install - Run the installScript for the given project entry
project clone - Clone repository (github only)
project browse - Browse project artifacts
project upgrade - Perform a post GsDevKit upgrade installation
project commit - Commit the Metacello project
project compare - View differences between repository versions (git only)
project diff - View code differences between image and repository
project entry - Create a new project entry
project unregister - Unregister the project
View TDMetacelloTool>>projectlog.st
projectlog
"
project log [--limit=<max-commit-log-entries>] <project-name>
"
| logLimit registration projectName |
self getSubcommandOptsMixedLongShort: {#('limit' nil #'required')}.
subOptions
at: 'limit'
ifPresent: [ :limit | logLimit := limit asNumber ]
View projectLogManPage.txt
NAME
project log - Browse commit log for the Metacello project (git only)
SYNOPSIS
project log [--limit=<max-commit-log-entries>] <project-name>
DESCRIPTION
OPTIONS
View seasideNewProject.st
[ :topez :objIn :tokens :command :commandNode |
| opts args |
"for help: ./seasideNewProject -h"
command
getOptsMixedLongShort:
{#('help' $h #'none'). #('stone' nil #'none'). #('local' nil #'none')}
optionsAndArguments: [ :options :operands |
opts := options.
args := operands ].
opts
You can’t perform that action at this time.