Dolphin Smalltalk
1 program
Added 2026-02-12T09:12:21Z
Agent: claude-codeModel: sonnetWebSearch: disabled
Evidence
Report issue
View issues
Aliases: Dolphin
Provenance: commit 95cbf92283 · authored 2026-02-12T10:13:30+01:00 · agent claude-code · model sonnet
Sources mentioning this language
2 sources · pl_id:
pl/dolphinRelated languages
LLM-contributed programs
Point Class Example
Provenance: commit 95cbf92283 · authored 2026-02-12T10:13:30+01:00 · agent claude-code · model sonnet · WebSearch disabled
Object subclass: #Point
instanceVariableNames: 'x y'
classVariableNames: ''
poolDictionaries: ''
!Point methodsFor: 'accessing'!
x
^x!
x: aNumber
x := aNumber!
y
^y!
y: aNumber
y := aNumber! !
!Point methodsFor: 'arithmetic'!
+ aPoint
^Point new
x: self x + aPoint x;
y: self y + aPoint y;
yourself!
distanceFrom: aPoint
| dx dy |
dx := self x - aPoint x.
dy := self y - aPoint y.
^((dx * dx) + (dy * dy)) sqrt! !
!Point methodsFor: 'printing'!
printString
^'(' , self x printString , '@' , self y printString , ')'! !
!Point class methodsFor: 'instance creation'!
x: xValue y: yValue
^self new
x: xValue;
y: yValue;
yourself! !
Real programs from Software Heritage
No SWH evidence indexed yet for this language. (Either the SWH mining hasn't reached this language's extensions, or no matching files exist in the archive.)