mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-12 23:00:22 +02:00
Use @result{} instead of -->
* doc/ref/goops.texi: Use @result{} instead of -->.
This commit is contained in:
parent
9e7ec8d16c
commit
f618f4363d
1 changed files with 9 additions and 9 deletions
|
@ -66,14 +66,14 @@ specialized for a particular set of argument types.
|
||||||
(define-method (+ (x <string>) (y <string>))
|
(define-method (+ (x <string>) (y <string>))
|
||||||
(string-append x y))
|
(string-append x y))
|
||||||
|
|
||||||
(+ "abc" "de") --> "abcde"
|
(+ "abc" "de") @result{} "abcde"
|
||||||
@end lisp
|
@end lisp
|
||||||
|
|
||||||
If @code{+} is used with arguments that do not match the method's
|
If @code{+} is used with arguments that do not match the method's
|
||||||
types, Guile falls back to using the normal Scheme @code{+} procedure.
|
types, Guile falls back to using the normal Scheme @code{+} procedure.
|
||||||
|
|
||||||
@lisp
|
@lisp
|
||||||
(+ 1 2) --> 3
|
(+ 1 2) @result{} 3
|
||||||
@end lisp
|
@end lisp
|
||||||
|
|
||||||
|
|
||||||
|
@ -94,7 +94,7 @@ types, Guile falls back to using the normal Scheme @code{+} procedure.
|
||||||
|
|
||||||
(define v (make <2D-vector> #:x 3 #:y 4))
|
(define v (make <2D-vector> #:x 3 #:y 4))
|
||||||
|
|
||||||
v --> <3, 4>
|
v @result{} <3, 4>
|
||||||
@end group
|
@end group
|
||||||
|
|
||||||
@group
|
@group
|
||||||
|
@ -103,7 +103,7 @@ v --> <3, 4>
|
||||||
#:x (+ (x-component x) (x-component y))
|
#:x (+ (x-component x) (x-component y))
|
||||||
#:y (+ (y-component x) (y-component y))))
|
#:y (+ (y-component x) (y-component y))))
|
||||||
|
|
||||||
(+ v v) --> <6, 8>
|
(+ v v) @result{} <6, 8>
|
||||||
@end group
|
@end group
|
||||||
@end lisp
|
@end lisp
|
||||||
|
|
||||||
|
@ -111,12 +111,12 @@ v --> <3, 4>
|
||||||
@subsection Types
|
@subsection Types
|
||||||
|
|
||||||
@example
|
@example
|
||||||
(class-of v) --> #<<class> <2D-vector> 40241ac0>
|
(class-of v) @result{} #<<class> <2D-vector> 40241ac0>
|
||||||
<2D-vector> --> #<<class> <2D-vector> 40241ac0>
|
<2D-vector> @result{} #<<class> <2D-vector> 40241ac0>
|
||||||
(class-of 1) --> #<<class> <integer> 401b2a98>
|
(class-of 1) @result{} #<<class> <integer> 401b2a98>
|
||||||
<integer> --> #<<class> <integer> 401b2a98>
|
<integer> @result{} #<<class> <integer> 401b2a98>
|
||||||
|
|
||||||
(is-a? v <2D-vector>) --> #t
|
(is-a? v <2D-vector>) @result{} #t
|
||||||
@end example
|
@end example
|
||||||
|
|
||||||
@node Tutorial
|
@node Tutorial
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue