fork download
copy 
  1. Object subclass: Calculator [
  2.     | result |
  3.  
  4.     Calculator class >> new [
  5.         ^super new initialize
  6.     ]
  7.  
  8.     initialize [
  9.         result := 0
  10.     ]
  11.  
  12.     add: number [
  13.         result := result + number.
  14.         ^result
  15.     ]
  16.  
  17.     subtract: number [
  18.         result := result - number.
  19.         ^result
  20.     ]
  21.  
  22.     multiplyBy: number [
  23.         result := result * number.
  24.         ^result
  25.     ]
  26.  
  27.     divideBy: number [
  28.         result := result / number.
  29.         ^result
  30.     ]
  31.  
  32.     getResult [
  33.         ^result
  34.     ]
  35. ]
  36.  
Success #stdin #stdout 0.01s 7860KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Standard output is empty
https://ideone.com/LcaeQn
language:
Smalltalk (gst 3.2.5)
created:
16 days ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!