1
Fork 0
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:
Neil Jerram 2009-08-09 11:40:01 +01:00
parent 9e7ec8d16c
commit f618f4363d

View file

@ -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