8 lines
130 B
C
8 lines
130 B
C
|
#include "factor.h"
|
||
|
|
|
||
|
|
void primitive_bignump(void)
|
||
|
|
{
|
||
|
|
check_non_empty(env.dt);
|
||
|
|
env.dt = tag_boolean(typep(env.dt,BIGNUM_TYPE));
|
||
|
|
}
|