iskm/learnxinyminutes-docs
1
0
Fork 0
mirror of https://github.com/adambard/learnxinyminutes-docs.git synced 2024-12-23 17:41:41 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

More comment fixes.

Browse Source
This commit is contained in:
Eli Barzilay 2013-07-16 01:29:37 -04:00
parent 6b282360b0
commit e8f8e2331b
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
racket.html.markdown
View File

@ -22,7 +22,7 @@ Feedback is appreciated! You can reach me at [@th3rac25](http://twitter.com/th3r
#| Block comments #| Block comments
can span multiple lines and... 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 #\space)
(show "---~a---" n #\-)) (show "---~a---" n #\-))
(define (show fmt n ch) ;; internal function (define (show fmt n ch) ; internal function
(printf fmt (make-string n ch)) (printf fmt (make-string n ch))
(newline))) (newline)))
@ -388,9 +388,9 @@ vec ; => #(1 2 3 4)
(class object% (class object%
(init size) ; initialization argument (init size) ; initialization argument
(super-new) ; superclass initialization (super-new) ; superclass initialization
; Field ;; Field
(define current-size size) (define current-size size)
; Public methods ;; Public methods
(define/public (get-size) current-size) (define/public (get-size) current-size)
(define/public (grow amt) (set! current-size (+ amt current-size))) (define/public (grow amt) (set! current-size (+ amt current-size)))
(define/public (eat other-fish) (grow (send other-fish get-size))))) (define/public (eat other-fish) (grow (send other-fish get-size)))))