Merge pull request #570 from jpellegrini/small-fixes

Cosmetic changes only

src/stklos.h

@@ -129,7 +129,7 @@ extern "C"
    * the file <gc.h> is not included in the source file in order to simplify
    * header file management (i.e. only this header file is necessary to use
    * the stklos library)).
-   * Don't use the functions GC_* they can be changed. The only allocation
+   * Don't use the functions GC_*, as they can be changed. The only allocation
    * functions that must be used are functions of the form STk_*
    */
 
@@ -195,8 +195,8 @@ typedef enum {
 
 
   /*
-   * Internal representation of SCM object. Object use the two least
-   * significant bit as tag. We have the following representation
+   * Internal representation of SCM objects. Objects use the two least
+   * significant bits as tag. We have the following representation
    *
    *     .........00            pointer on an object descriptor (a box)
    *     .........01            integer
@@ -528,7 +528,7 @@ void STk_export_all_symbols(SCM module);
   ------------------------------------------------------------------------------
 */
   /* The `extended_type_descr' structure is used for the types which need
-   *  more information (such as modules, ports, ....). All the extended
+   * more information (such as modules, ports, ...). All the extended
    * descriptors are stored in the STk_xtypes array.
    */
 struct extended_type_descr {
@@ -762,7 +762,7 @@ extern double STk_NaN;          /* IEEE NaN special value */
   /****
    **** Bignum
    ****/
-struct bignum_obj;      /* complete deflaration is in number.c */
+struct bignum_obj;      /* complete declaration is in number.c */
 
 #define BIGNUMP(p)      (BOXED_TYPE_EQ((p), tc_bignum))
 
@@ -1155,7 +1155,7 @@ SCM   STk_read(SCM port, int case_significant);
 SCM   STk_read_constant(SCM port, int case_significant);
 char *STk_quote2str(SCM symb);
 int   STk_init_reader(void);
-int   STk_keyword_colon_convention(void); // pos. of ':' in symbolro make a  keyword
+int   STk_keyword_colon_convention(void); // pos. of ':' in symbol to make a  keyword
 extern int STk_read_case_sensitive;
 
 
@@ -1325,14 +1325,14 @@ extern int STk_use_utf8;
   ((0 <= (c)  && (c) <=  0xd7ff) || (0xE000 <=(c) && (c) <= 0x10FFFF))
 
 
-char *STk_utf8_grab_char(char *str, uint32_t *c);/* result = pos. after current one */
+char *STk_utf8_grab_char(char *str, uint32_t *c); /* result = pos. after current one */
 int STk_char2utf8(int ch, char *str); /* result = length of the UTF-8 repr. */
 int STk_utf8_strlen(const char *s, int max);
 int STk_utf8_read_char(SCM port);
 int STk_utf8_sequence_length(const char *str); /* # of bytes of sequence starting at str */
-int STk_utf8_char_bytes_needed(unsigned int ch);/* # of bytes needed to represent ch*/
+int STk_utf8_char_bytes_needed(unsigned int ch); /* # of bytes needed to represent ch*/
 int STk_utf8_verify_sequence(char *s, int len); /* s constitutes a valid UTF8? */
-char *STk_utf8_index(char *s, int i, int max);/* return the address of ith char of s*/
+char *STk_utf8_index(char *s, int i, int max); /* return the address of ith char of s*/
 int STk_utf8_char_from_byte(char *s, int i, int max); /*  byte index => char index */
 
 int STk_init_utf8(void);