Skip to content

Instantly share code, notes, and snippets.

View frankshearar's full-sized avatar
💭
(╬ ಠ益ಠ) THE WIND CRIED LAMENTATION BEFORE MERGING WITH THE GRAVE

Frank Shearar frankshearar

💭
(╬ ಠ益ಠ) THE WIND CRIED LAMENTATION BEFORE MERGING WITH THE GRAVE
View GitHub Profile
@seandenigris
seandenigris / gist:1438930
Last active October 23, 2016 23:13
Sample Metacello Workflow
"Describe Project Structure to Create configuration"
MetacelloToolBox
createBaseline: '1.0-baseline'
for: 'SimpleApplescript' "Project name"
repository: 'http://squeaksource.com/SPDPlayground'
requiredProjects: #('OSProcess')
packages: #('CommandShell-Piping' 'SimpleApplescript')
repositories: #()
dependencies: {
('SimpleApplescript' -> #('CommandShell-Piping')).
ometa PrologTranslator : Parser {
variable ::= <spaces> <firstAndRest #upper #letterOrDigit>:name => [Var new: (name join: '')].
symbol ::= <spaces> <firstAndRest #lower #letterOrDigit>:name => [Sym new: (name join: '')].
clause ::= <symbol>:sym <token '('> <listOf #expr ','>:args <token ')'> => [Clause new: sym : args].
expr ::= <clause> | <variable> | <symbol>.
clauses ::= <listOf #clause ','>.
rule ::= <clause>:head <token ':-'> <clauses>:body <token '.'> => [Rule new: head : body]
| <clause>:head <token '.'> => [Rule new: head : {}].
rules ::= <rule>*:rs <spaces> <end> => [rs].
query ::= <clause>:c <spaces> <end> => [c].