Data commit
This commit is contained in:
parent
7387c8f97b
commit
cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
15
Task/Classes/Racket/classes.rkt
Normal file
15
Task/Classes/Racket/classes.rkt
Normal file
|
|
@ -0,0 +1,15 @@
|
|||
#lang racket
|
||||
|
||||
(define fish%
|
||||
(class object%
|
||||
(super-new)
|
||||
|
||||
;; an instance variable & constructor argument
|
||||
(init-field size)
|
||||
|
||||
;; a new method
|
||||
(define/public (eat)
|
||||
(displayln "gulp!"))))
|
||||
|
||||
;; constructing an instance
|
||||
(new fish% [size 50])
|
||||
Loading…
Add table
Add a link
Reference in a new issue