02 Jul 2023

Some experiments with Pharo

Cool that it is so easy to include an inspector in the GUI:

defaultLayout

  | rt |
  rt := Raytracer new.
  rt scene: (Scene demo).

  ^ SpBoxLayout newLeftToRight
    add: (SpBoxLayout newTopToBottom
      add: (SpMorphPresenter new morph: (rt imageMorph));
      addLast: (SpPresenter new newButton label: 'Render';
        action: [rt render] ) expand: false;
      yourself);
    add: (StInspector new model: (rt scene objects) );
      yourself