Uko
/ CoinMMUhack.st
Last active
February 2, 2020 22:29
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
| colorChangeIndex := self detectIndex: [ :s | s = '; PRINT_COLOR_CHANGE' ]. | |
| startLines := self first: colorChangeIndex-1. | |
| restLines := self allButFirst: colorChangeIndex + 1. | |
| layerChangeIndex := restLines detectIndex: [ :s | s = ';AFTER_LAYER_CHANGE' ]. | |
| endLines := restLines allButFirst: layerChangeIndex. | |
| layerLines := restLines first: layerChangeIndex. |
Uko
/ SophiPot.scad
Created
January 24, 2020 15:14
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
| top_d = 107; | |
| wider_ridge_d = 100; | |
| narrower_ridge_d = 92; | |
| bottom_d = 78; | |
| top_h = 18; | |
| h = 80; |
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
| map $http_upgrade $connection_upgrade { | |
| default upgrade; | |
| '' close; | |
| } | |
| server { | |
| listen 80; | |
| listen [::]:80; | |
| server_name mastodon-test.tymchuk.me; | |
| root /home/mastodon/live/public; |
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
| | methods size | | |
| methods := (RPackage organizer packages select: [ :p | p packageManifestOrNil isNil]) flatCollect: #methods. | |
| size := methods size * | |
| (ReRuleManager uniqueInstance methodRules size + | |
| ReRuleManager uniqueInstance nodeRules size). | |
| (1 to: 10) collect: [ :x | | |
| [ methods do: [ :m | m critiques ] ] timeToRunWithoutGC / size ]. |
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
| 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) |
Uko
/ treeModelExperiment.st
Created
July 17, 2014 09:40
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 ];" |
Uko
/ pharo-fuel.st
Created
May 31, 2014 06:27
Snippet showing how to use Fuel serialisation engine in Pharo
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
| Gofer new | |
| smalltalkhubUser: 'Moose' project: 'GToolkit'; | |
| configuration; | |
| loadDevelopment. | |
| #GTImageSetupCommandLineHandler asClass new | |
| installGTInspector; | |
| installGTPlayground; | |
| disableBreakingCommandPlusOKeybindingsInPharo30. | |
Uko
/ .travis.yml
Created
May 16, 2014 06:40
This gist is a Travis-CI config to test Pharo project. Please specify a project name. Also pay attention that you probably have to change repo location. If you have only one version (stable or dev) just delete the line defining $VERSION that you don't need
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 |
NewerOlder