This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| builder models | | |
models := (RPackageOrganizer default packageNamed: 'AST-Core') definedClasses. | |
models do: [ :class | | |
class methods do: [ :method | | |
REPrefs default rules do: [ :rule | | |
rule validate: method ] ] ]. | |
builder := CCBuilder new description: 'Boxes in packed layout (isometric view)'. | |
builder packingLayout. | |
builder shapeBuilder platform | |
color: |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
language: pharo | |
env: | |
global: | |
- PROJECT=<your_project_name> | |
- REPO=http://www.smalltalkhub.com/mc/Pharo/MetaRepoForPharo30/main | |
- PHARO=30 | |
matrix: | |
- VERSION=stable | |
- VERSION=development |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Gofer new | |
smalltalkhubUser: 'Moose' project: 'GToolkit'; | |
configuration; | |
loadDevelopment. | |
#GTImageSetupCommandLineHandler asClass new | |
installGTInspector; | |
installGTPlayground; | |
disableBreakingCommandPlusOKeybindingsInPharo30. | |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
"to serialize the object use" | |
FLSerializer serialize: object toFileNamed: 'file-name.fuel'. | |
"to deserialize use" | |
FLMaterializer materializeFromFileNamed: 'file-name.fuel' |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
TreeModel new | |
roots: (RPackageOrganizer default packageNamed: 'Vidi') classes; | |
beCheckList; | |
autoMultiSelection: true; | |
multiSelection: true; | |
autoDeselection: false; | |
childrenBlock: [ :class | class isClass | |
ifTrue: [ class methods ] | |
ifFalse: [ #() ] ]; | |
"hasChildrenBlock: [ :entity | entity isClass ];" |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
import turtle | |
def circle(radius = 50, segments = 60): | |
turn_step = 360 / segments | |
segment_step = 6.28 * radius / segments | |
turtle.left(turn_step / 2) | |
for i in range(segments): | |
color_step = 2 * i / (segments - 1) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
"facet\\s+?normal" + | |
"\\s+?(-?\\d+(\\.\\d+([eE][+-]\\d+)?)?)" + | |
"\\s+?(-?\\d+(\\.\\d+([eE][+-]\\d+)?)?)" + | |
"\\s+?(-?\\d+(\\.\\d+([eE][+-]\\d+)?)?)" + | |
"\\s+?outer\\s+?loop" + | |
"\\s+?vertex" + | |
"\\s+?(-?\\d+(\\.\\d+([eE][+-]\\d+)?)?)" + | |
"\\s+?(-?\\d+(\\.\\d+([eE][+-]\\d+)?)?)" + | |
"\\s+?(-?\\d+(\\.\\d+([eE][+-]\\d+)?)?)" + | |
"\\s+?vertex" + |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
critics := (self | |
collect: | |
[ :pharoV | | |
(pharoV files | |
reject: [ :criticF | criticF basename = '.done' ] | |
thenCollect: #basename) | |
select: | |
[ :crit | | |
Smalltalk globals | |
at: crit asSymbol |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/bash | |
# DOWNLOAD THE LATEST IMAGE =================================================== | |
IMAGE_URL="http://pharo.gforge.inria.fr/ci/image/20/latest.zip" | |
wget --progress=bar:force --output-document=image.zip $IMAGE_URL | |
unzip -qo image.zip -d pharo2 | |
rm -rf image.zip |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
"script by Damien Cassou originaly from: https://code.google.com/p/smalltalk-hub/issues/detail?id=12" | |
| source goSource destination goDestination files destinationFiles | | |
source := MCHttpRepository location: '<url-to-source-sepository>'. | |
destination := MCHttpRepository | |
location: '<url-to-destination-sepository>' | |
user: '<login>' | |
password: '<pass>'. |
OlderNewer