/[gcl]/gcl/o/num_co.c
ViewVC logotype

Diff of /gcl/o/num_co.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.16 by camm, Wed May 26 02:03:47 2004 UTC revision 1.17 by camm, Wed Aug 25 03:10:14 2004 UTC
# Line 1490  gcl_init_num_co(void) Line 1490  gcl_init_num_co(void)
1490          make_constant("LEAST-NEGATIVE-NORMALIZED-LONG-FLOAT",          make_constant("LEAST-NEGATIVE-NORMALIZED-LONG-FLOAT",
1491                        make_longfloat(-smallest_norm_double));                        make_longfloat(-smallest_norm_double));
1492    
1493          plus_half = make_ratio(small_fixnum(1), small_fixnum(2));          plus_half = make_ratio(small_fixnum(1), small_fixnum(2),1);
1494          enter_mark_origin(&plus_half);          enter_mark_origin(&plus_half);
1495    
1496          minus_half = make_ratio(small_fixnum(-1), small_fixnum(2));          minus_half = make_ratio(small_fixnum(-1), small_fixnum(2),1);
1497          enter_mark_origin(&minus_half);          enter_mark_origin(&minus_half);
1498    
1499          make_function("FLOAT", Lfloat);          make_function("FLOAT", Lfloat);

Legend:
Removed from v.1.16  
changed lines
  Added in v.1.17

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26