org.jatha.dynatype
Class StandardLispInteger

java.lang.Object
  org.jatha.dynatype.StandardLispValue
      org.jatha.dynatype.StandardLispAtom
          org.jatha.dynatype.StandardLispNumber
              org.jatha.dynatype.StandardLispInteger

All Implemented Interfaces:

Comparable, LispAtom, LispInteger, LispNumber, LispValue

Direct Known Subclasses:

StandardLispBignum

public class StandardLispInteger
extends StandardLispNumber
implements LispInteger

Field Summary

private long

f_value

Fields inherited from class org.jatha.dynatype.StandardLispValue

f_lisp

Constructor Summary

StandardLispInteger()

StandardLispInteger(Jatha lisp)

StandardLispInteger(Jatha lisp, long theValue)

Method Summary

LispValue	abs() Integer implementation of abs.
boolean	basic_integerp() Returns Java true if the object is an integer.
LispValue	eql(LispValue val) Returns T if the argument is EQ to the object or if the arguments and object are numbers with equal values.
LispValue	equal(LispValue val) Returns T if the argument is EQL or if two strings are STRING= or if two trees have EQUAL subtrees.
BigInteger	getBigIntegerValue()
double	getDoubleValue() Returns a double value corresponding to this value.
long	getLongValue()
long	getValue()
LispValue	integerp() Returns T if the object is an Integer.
void	internal_prin1(PrintStream os)
void	internal_princ(PrintStream os)
void	internal_print(PrintStream os)
Object	toJava() Returns a Java Long object with the value of this integer.
Object	toJava(String typeHint) Returns a Java Double, Float or Integer object, depending on the typeHint.
String	toString() toString() returns a printed representation of the form (as printed by (prin1)) in a Java string.
LispValue	type_of()
LispValue	typep(LispValue type)
LispValue	zerop()

Methods inherited from class org.jatha.dynatype.StandardLispNumber

acos, add, asin, atan, atan2, basic_constantp, basic_numberp, ceiling, constantp, cos, cot, csc, degreesToRadians, divide, equalNumeric, factorial, floor, greaterThan, greaterThanOrEqual, lessThan, lessThanOrEqual, max, min, multiply, negate, numberp, radiansToDegrees, reciprocal, sec, sin, sqrt, subtract, tan

Methods inherited from class org.jatha.dynatype.StandardLispAtom

atom, basic_atom

Methods inherited from class org.jatha.dynatype.StandardLispValue

adjustSpecialCount, append, apply, apropos_print, assoc, basic_bignump, basic_consp, basic_floatp, basic_foreignp, basic_functionp, basic_keywordp, basic_length, basic_listp, basic_macrop, basic_null, basic_stringp, basic_symbolp, bignump, boundp, butlast, car, cdr, characterp, clrhash, compareTo, concatenate, consp, contains, copy_list, copy, documentation, eighth, elt, elt, eq, fboundp, fifth, first, floatp, fourth, funcall, functionp, get_specialCount, gethash, gethash, getLisp, hash_table_count, hash_table_rehash_size, hash_table_rehash_threshold, hash_table_size, hash_table_test, hashtablep, internal_getName, internal_prin1_as_cdr, internal_princ_as_cdr, internal_print_as_cdr, iterator, keywordp, last, length, lisp_null, list, listp, member, nconc, neql, ninth, nreverse, nstringCapitalize, nstringDowncase, nstringUpcase, pop, position, prin1, princ, print, push, rassoc, readFromString, remhash, remove, rest, reverse, rplaca, rplacd, second, set_special, setf_documentation, setf_gethash, setf_symbol_function, setf_symbol_plist, setf_symbol_value, setLisp, setPackage, setq, seventh, showStackTrace, sixth, specialP, string, stringCapitalize, stringDowncase, stringEndsWith, stringEq, stringEqual, stringGreaterP, stringGreaterThan, stringGreaterThanOrEqual, stringLeftTrim, stringLeftTrim, stringLessP, stringLessThan, stringLessThanOrEqual, stringNeq, stringNotGreaterP, stringNotLessP, stringp, stringRightTrim, stringRightTrim, stringStartsWith, stringTrim, stringTrim, stringUpcase, subst, substring, substring, symbol_function, symbol_name, symbol_package, symbol_plist, symbol_value, symbolp, tenth, third, toCollection, toString, toStringAsCdr_internal, toStringAsCdr, toStringShort, toStringShort, toStringSimple, uses

Methods inherited from class java.lang.Object

clone, equals, finalize, getClass, hashCode, notify, notifyAll, wait, wait, wait

Methods inherited from interface org.jatha.dynatype.LispValue

acos, add, adjustSpecialCount, append, apply, apropos_print, asin, assoc, atan, atan2, atom, basic_atom, basic_bignump, basic_consp, basic_constantp, basic_floatp, basic_foreignp, basic_functionp, basic_keywordp, basic_length, basic_listp, basic_macrop, basic_null, basic_numberp, basic_stringp, basic_symbolp, bignump, boundp, butlast, car, cdr, ceiling, characterp, clrhash, compareTo, concatenate, consp, constantp, contains, copy_list, copy, cos, cot, csc, degreesToRadians, divide, documentation, eighth, elt, elt, eq, equalNumeric, factorial, fboundp, fifth, first, floatp, floor, fourth, funcall, functionp, get_specialCount, gethash, gethash, getLisp, greaterThan, greaterThanOrEqual, hash_table_count, hash_table_rehash_size, hash_table_rehash_threshold, hash_table_size, hash_table_test, hashtablep, internal_getName, internal_prin1_as_cdr, internal_princ_as_cdr, internal_print_as_cdr, iterator, keywordp, last, length, lessThan, lessThanOrEqual, lisp_null, list, listp, max, member, min, multiply, nconc, negate, neql, ninth, nreverse, nstringCapitalize, nstringDowncase, nstringUpcase, numberp, pop, position, prin1, princ, print, push, radiansToDegrees, rassoc, readFromString, reciprocal, remhash, remove, rest, reverse, rplaca, rplacd, sec, second, set_special, setf_documentation, setf_gethash, setf_symbol_function, setf_symbol_plist, setf_symbol_value, setLisp, setPackage, setq, seventh, sin, sixth, specialP, sqrt, string, stringCapitalize, stringDowncase, stringEndsWith, stringEq, stringEqual, stringGreaterP, stringGreaterThan, stringGreaterThanOrEqual, stringLeftTrim, stringLeftTrim, stringLessP, stringLessThan, stringLessThanOrEqual, stringNeq, stringNotGreaterP, stringNotLessP, stringp, stringRightTrim, stringRightTrim, stringStartsWith, stringTrim, stringTrim, stringUpcase, subst, substring, substring, subtract, symbol_function, symbol_name, symbol_package, symbol_plist, symbol_value, symbolp, tan, tenth, third, toCollection, toString, toStringAsCdr_internal, toStringAsCdr, toStringShort, toStringShort, toStringSimple, uses

Field Detail

f_value

private long f_value

Constructor Detail

StandardLispInteger

public StandardLispInteger()

StandardLispInteger

public StandardLispInteger(Jatha lisp,
                           long theValue)

StandardLispInteger

public StandardLispInteger(Jatha lisp)

Method Detail

getValue

public long getValue()

getDoubleValue

public double getDoubleValue()

Description copied from interface: LispNumber

Returns a double value corresponding to this value.

Specified by:

getDoubleValue in interface LispNumber

Specified by:

getDoubleValue in class StandardLispNumber

getBigIntegerValue

public BigInteger getBigIntegerValue()

Specified by:

getBigIntegerValue in interface LispNumber

getLongValue

public long getLongValue()

Specified by:

getLongValue in interface LispNumber

internal_princ

public void internal_princ(PrintStream os)

Specified by:

internal_princ in interface LispValue

Overrides:

internal_princ in class StandardLispValue

internal_prin1

public void internal_prin1(PrintStream os)

Specified by:

internal_prin1 in interface LispValue

Overrides:

internal_prin1 in class StandardLispValue

internal_print

public void internal_print(PrintStream os)

Specified by:

internal_print in interface LispValue

Overrides:

internal_print in class StandardLispValue

basic_integerp

public boolean basic_integerp()

Description copied from interface: LispValue

Returns Java true if the object is an integer.

Specified by:

basic_integerp in interface LispValue

Overrides:

basic_integerp in class StandardLispValue

toJava

public Object toJava()

Returns a Java Long object with the value of this integer.

Specified by:

toJava in interface LispValue

Overrides:

toJava in class StandardLispValue

toJava

public Object toJava(String typeHint)

Returns a Java Double, Float or Integer object, depending on the typeHint.

Specified by:

toJava in interface LispValue

Overrides:

toJava in class StandardLispValue

toString

public String toString()

Description copied from class: StandardLispValue

toString() returns a printed representation of the form (as printed by (prin1)) in a Java string.

Specified by:

toString in interface LispValue

Overrides:

toString in class StandardLispValue

Returns:

String The value in a string.

abs

public LispValue abs()

Integer implementation of abs.

Specified by:

abs in interface LispValue

Overrides:

abs in class StandardLispNumber

eql

public LispValue eql(LispValue val)

Description copied from interface: LispValue

Returns T if the argument is EQ to the object or if the arguments and object are numbers with equal values.

Specified by:

eql in interface LispValue

Overrides:

eql in class StandardLispNumber

equal

public LispValue equal(LispValue val)

Description copied from interface: LispValue

Returns T if the argument is EQL or if two strings are STRING= or if two trees have EQUAL subtrees.

Specified by:

equal in interface LispValue

Overrides:

equal in class StandardLispValue

integerp

public LispValue integerp()

Description copied from interface: LispValue

Returns T if the object is an Integer.

Specified by:

integerp in interface LispValue

Overrides:

integerp in class StandardLispValue

type_of

public LispValue type_of()

Specified by:

type_of in interface LispValue

Overrides:

type_of in class StandardLispValue

typep

public LispValue typep(LispValue type)

Specified by:

typep in interface LispValue

Overrides:

typep in class StandardLispNumber

zerop

public LispValue zerop()

Specified by:

zerop in interface LispValue

Overrides:

zerop in class StandardLispValue