Ratio arithmetic separated out into its own files.
This commit is contained in:
parent
a5e1d3ccd8
commit
ad9b1cd7f8
8 changed files with 393 additions and 230 deletions
|
|
@ -13,7 +13,6 @@
|
|||
|
||||
#include "conspage.h"
|
||||
#include "consspaceobject.h"
|
||||
#include "read.h"
|
||||
|
||||
/**
|
||||
* return the numeric value of this cell, as a C primitive double, not
|
||||
|
|
@ -41,7 +40,9 @@ struct cons_pointer make_integer( long int value ) {
|
|||
struct cons_space_object *cell = &pointer2cell( result );
|
||||
cell->payload.integer.value = value;
|
||||
|
||||
#ifdef DEBUG
|
||||
dump_object( stderr, result );
|
||||
#endif
|
||||
|
||||
return result;
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue