Skip to content

Instantly share code, notes, and snippets.

@brackendev

brackendev/FindImageMorphs.st

Created October 3, 2019 00:27
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save brackendev/039f5d81399a9ac6e8f502528de15a93 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save brackendev/039f5d81399a9ac6e8f502528de15a93 to your computer and use it in GitHub Desktop.
Download ZIP

Revisions

  1. brackendev created this gist Oct 3, 2019.
    13 changes: 13 additions & 0 deletions FindImageMorphs.st
    View file
    Original file line number Diff line number Diff line change
    @@ -0,0 +1,13 @@
    ImageMorph allInstances do: [ :im |
    im bounds origin x = 0 & im bounds origin y = 0 &
    im bounds corner x = 1 & im bounds corner y = 1 &
    im height = 1 & im width = 1
    ifTrue: [ im inspect]
    ].

    ImageMorph allInstances collect: [ :im |
    im bounds origin x = 0 & im bounds origin y = 0 &
    im bounds corner x = 1 & im bounds corner y = 1 &
    im height = 1 & im width = 1
    ifTrue: [ im height = 100. im width = 100 ]
    ].