fine-tune typechecking index entry

svn: r12920

collects/mzlib/foreign.ss

@@ -677,9 +677,11 @@
     [(_ x ...) (begin (set! xs (syntax->list #'(x ...))) (do-fun))]))
 
 (define (function-ptr p fun-ctype)
-  (if (cpointer? p)
+  (if (or (cpointer? p) (procedure? p))
       (if (eq? (ctype->layout fun-ctype) 'fpointer)
-          ((ctype-c->scheme fun-ctype) p)
+           (if (procedure? p)
+               ((ctype-scheme->c fun-ctype) p)
+               ((ctype-c->scheme fun-ctype) p))
           (raise-type-error 'function-ptr "function ctype" fun-ctype))
       (raise-type-error 'function-ptr "cpointer" p)))
 

collects/scribblings/scribble/basic.scrbl

@@ -189,7 +189,13 @@ strings for a hierarchy, such as @scheme['("strings" "plain")] for a
 the strings are ``cleaned'' using @scheme[clean-up-index-strings]. The
 strings (without clean-up) also serve as the text to render in the
 index. The @tech{decode}d @scheme[pre-content] is the text to appear
-inline as the index target.}
+inline as the index target.
+
+Use @scheme[index] when an index entry should point to a specific word
+or phrase within the typeset document (i.e., the
+@scheme[pre-content]). Use @scheme[section-index], instead, to create
+an index entry that leads to a section, instead of a specific word or
+phrase within the section.}
 
 
 @defproc[(index* [words (listof string?)]

collects/typed-scheme/ts-guide.scrbl

@@ -14,7 +14,7 @@
 
 @author["Sam Tobin-Hochstadt"]
 
-@index["typecheck"]
+@section-index["typechecking"]
 
 Typed Scheme is a Scheme-like language, with a type system that
 supports common Scheme programming idioms.  Explicit type declarations