*** guile.texi/api-data.texi 2014-03-17 16:33:37.000000000 -0400 --- modded-guile.texi/api-data.texi 2016-03-02 21:07:44.900164075 -0500 *************** *** 1708,1714 **** @deffn {Scheme Procedure} ash n count @deffnx {C Function} scm_ash (n, count) ! Return @math{floor(n * 2^count)}. @var{n} and @var{count} must be exact integers. With @var{n} viewed as an infinite-precision twos-complement --- 1708,1714 ---- @deffn {Scheme Procedure} ash n count @deffnx {C Function} scm_ash (n, count) ! Return @math{floor(n * 2^{count})}. @var{n} and @var{count} must be exact integers. With @var{n} viewed as an infinite-precision twos-complement *************** *** 5096,5102 **** @lisp ;; 1=red, 2=green, 3=purple ! (if (eq? (colour-of car) 1) ...) @end lisp --- 5096,5102 ---- @lisp ;; 1=red, 2=green, 3=purple ! (if (eq? (colour-of vehicle) 1) ...) @end lisp *************** *** 5109,5115 **** (define green 2) (define purple 3) ! (if (eq? (colour-of car) red) ...) @end lisp --- 5109,5115 ---- (define green 2) (define purple 3) ! (if (eq? (colour-of vehicle) red) ...) @end lisp *************** *** 5118,5124 **** symbols whose names specify the colours that they refer to: @lisp ! (if (eq? (colour-of car) 'red) ...) @end lisp --- 5118,5124 ---- symbols whose names specify the colours that they refer to: @lisp ! (if (eq? (colour-of vehicle) 'red) ...) @end lisp *************** *** 5140,5154 **** manipulated as a list of symbols: @lisp ! (properties-of car1) @result{} (red manual unleaded power-steering) ! (if (memq 'power-steering (properties-of car1)) ! (display "Unfit people can drive this car.\n") ! (display "You'll need strong arms to drive this car!\n")) @print{} ! Unfit people can drive this car. @end lisp Remember, the fundamental property of symbols that we are relying on --- 5140,5154 ---- manipulated as a list of symbols: @lisp ! (properties-of vehicle1) @result{} (red manual unleaded power-steering) ! (if (memq 'power-steering (properties-of vehicle1)) ! (display "Unfit people can drive this vehicle.\n") ! (display "You'll need strong arms to drive this vehicle!\n")) @print{} ! Unfit people can drive this vehicle. @end lisp Remember, the fundamental property of symbols that we are relying on