Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse code

improve comment content and comment and code formatting

  • Loading branch information...
commit 98fc4f3697048463af20d31296a30b3349b380d4 1 parent 37e3de1
Peter Michaux authored

Showing 1 changed file with 5 additions and 4 deletions. Show diff stats Hide diff stats

  1. +5 4 scm.h
9 scm.h
@@ -26,12 +26,13 @@ typedef long scm_object;
26 26 #define scm_fixnum_make(val) ((scm_object)(val))
27 27 #define scm_fixnum_value(object) ((scm_int)(object))
28 28
29   -/* Assume a two's complement hardware representation and
30   - * ensure that any number can be algebraically negated
  29 +/* Assume a two's complement hardware representation.
  30 + *
  31 + * Ensure that any number can be algebraically negated
31 32 * and the result is still in the acceptable range.
32 33 */
33   -#define scm_fixnum_min \
34   - ((((scm_int)1)<<(8*sizeof(scm_object)-1))+1)
  34 +#define scm_fixnum_min ((((scm_int)1) \
  35 + << (8 * sizeof(scm_object) - 1)) + 1)
35 36 #define scm_fixnum_max (-(scm_fixnum_min))
36 37
37 38 /************************* read.c *************************/

0 comments on commit 98fc4f3

Please sign in to comment.
Something went wrong with that request. Please try again.