| 
									
										
										
										
											2013-05-11 21:44:20 -04:00
										 |  |  | namespace factor { | 
					
						
							| 
									
										
										
										
											2009-05-04 02:46:13 -04:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2013-05-11 21:44:20 -04:00
										 |  |  | /*
 | 
					
						
							| 
									
										
										
										
											2009-05-02 05:04:19 -04:00
										 |  |  | 
 | 
					
						
							|  |  |  | Copyright (C) 1989-1992 Massachusetts Institute of Technology | 
					
						
							| 
									
										
										
										
											2009-05-04 02:00:30 -04:00
										 |  |  | Portions copyright (C) 2004-2009 Slava Pestov | 
					
						
							| 
									
										
										
										
											2009-05-02 05:04:19 -04:00
										 |  |  | 
 | 
					
						
							|  |  |  | This material was developed by the Scheme project at the Massachusetts | 
					
						
							|  |  |  | Institute of Technology, Department of Electrical Engineering and | 
					
						
							|  |  |  | Computer Science.  Permission to copy and modify this software, to | 
					
						
							|  |  |  | redistribute either the original software or a modified version, and | 
					
						
							|  |  |  | to use this software for any purpose is granted, subject to the | 
					
						
							|  |  |  | following restrictions and understandings. | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 1. Any copy made of this software must include this copyright notice | 
					
						
							|  |  |  | in full. | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 2. Users of this software agree to make their best efforts (a) to | 
					
						
							|  |  |  | return to the MIT Scheme project any improvements or extensions that | 
					
						
							|  |  |  | they make, so that these may be included in future releases; and (b) | 
					
						
							|  |  |  | to inform MIT of noteworthy uses of this software. | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 3. All materials developed as a consequence of the use of this | 
					
						
							|  |  |  | software shall duly acknowledge such use, in accordance with the usual | 
					
						
							|  |  |  | standards of acknowledging credit in academic research. | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 4. MIT has made no warrantee or representation that the operation of | 
					
						
							|  |  |  | this software will be error-free, and MIT is under no obligation to | 
					
						
							|  |  |  | provide any services, by way of maintenance, update, or otherwise. | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 5. In conjunction with products arising from the use of this material, | 
					
						
							|  |  |  | there shall be no use of the name of the Massachusetts Institute of | 
					
						
							|  |  |  | Technology nor of any adaptation thereof in any advertising, | 
					
						
							|  |  |  | promotional, or sales literature without prior written consent from | 
					
						
							|  |  |  | MIT in each case. */ | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2013-05-11 21:44:20 -04:00
										 |  |  | #define BIGNUM_OUT_OF_BAND ((bignum*)0)
 | 
					
						
							| 
									
										
										
										
											2009-05-02 05:04:19 -04:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2013-05-11 21:44:20 -04:00
										 |  |  | enum bignum_comparison { | 
					
						
							| 
									
										
										
										
											2009-05-02 05:04:19 -04:00
										 |  |  |   bignum_comparison_equal = 0, | 
					
						
							|  |  |  |   bignum_comparison_less = -1, | 
					
						
							|  |  |  |   bignum_comparison_greater = 1 | 
					
						
							|  |  |  | }; | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2015-06-28 08:49:12 -04:00
										 |  |  | cell bignum_maybe_to_fixnum(bignum* bn); | 
					
						
							| 
									
										
										
										
											2015-06-24 12:50:04 -04:00
										 |  |  | cell bignum_to_cell(bignum* bn); | 
					
						
							|  |  |  | fixnum bignum_to_fixnum(bignum* bn); | 
					
						
							|  |  |  | int64_t bignum_to_long_long(bignum* bn); | 
					
						
							|  |  |  | uint64_t bignum_to_ulong_long(bignum* bn); | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2009-05-04 02:46:13 -04:00
										 |  |  | } |