Scribblibgs
This commit is contained in:
2
info.rkt
2
info.rkt
@@ -1,7 +1,7 @@
|
||||
#lang info
|
||||
|
||||
(define pkg-authors '(hnmdijkema))
|
||||
(define version "0.51")
|
||||
(define version "0.52")
|
||||
(define license 'Apache-2.0)
|
||||
(define collection "roos")
|
||||
(define pkg-desc "An OO Framework for Racket")
|
||||
|
||||
@@ -46,7 +46,7 @@ Returns the defined roos class of an instantiated roos class if @code{roos-objec
|
||||
(y ( + x 4))
|
||||
((g a) (* a (-> this y))))
|
||||
|
||||
(def-roos (b1) this (supers (a 6))
|
||||
(def-roos (b1) this (supers (-* a 6))
|
||||
((v . a) (if (null? a)
|
||||
(-> supers y)
|
||||
(begin
|
||||
@@ -54,11 +54,11 @@ Returns the defined roos class of an instantiated roos class if @code{roos-objec
|
||||
(-> supers y))))
|
||||
(y 55))
|
||||
|
||||
(def-roos (b2) this (supers (a 5))
|
||||
(def-roos (b2) this (supers (-* a 5))
|
||||
((v2) (-> supers y))
|
||||
((v2*) (-> this y)))
|
||||
|
||||
(def-roos (c) this (supers (b1) (b2))
|
||||
(def-roos (c) this (supers (-* b1) (-* b2))
|
||||
((zy) (-> supers y))
|
||||
((z1) (-> supers v))
|
||||
((z2) (-> supers v2))
|
||||
|
||||
Reference in New Issue
Block a user