mirror of
https://github.com/adambard/learnxinyminutes-docs.git
synced 2024-12-23 17:41:41 +00:00
More comment fixes.
This commit is contained in:
parent
6b282360b0
commit
e8f8e2331b
@ -22,7 +22,7 @@ Feedback is appreciated! You can reach me at [@th3rac25](http://twitter.com/th3r
|
||||
#| Block comments
|
||||
can span multiple lines and...
|
||||
#|
|
||||
they can be nested !
|
||||
they can be nested!
|
||||
|#
|
||||
|#
|
||||
|
||||
@ -370,7 +370,7 @@ vec ; => #(1 2 3 4)
|
||||
(show " | ~a | " n #\space)
|
||||
(show "---~a---" n #\-))
|
||||
|
||||
(define (show fmt n ch) ;; internal function
|
||||
(define (show fmt n ch) ; internal function
|
||||
(printf fmt (make-string n ch))
|
||||
(newline)))
|
||||
|
||||
@ -388,9 +388,9 @@ vec ; => #(1 2 3 4)
|
||||
(class object%
|
||||
(init size) ; initialization argument
|
||||
(super-new) ; superclass initialization
|
||||
; Field
|
||||
;; Field
|
||||
(define current-size size)
|
||||
; Public methods
|
||||
;; Public methods
|
||||
(define/public (get-size) current-size)
|
||||
(define/public (grow amt) (set! current-size (+ amt current-size)))
|
||||
(define/public (eat other-fish) (grow (send other-fish get-size)))))
|
||||
|
Loading…
Reference in New Issue
Block a user