edu.vub.at.objects.natives
Class NATNumber

java.lang.Object
  edu.vub.at.objects.natives.NATNil
      edu.vub.at.objects.natives.NATByCopy
          edu.vub.at.objects.natives.grammar.NATAbstractGrammar
              edu.vub.at.objects.natives.grammar.AGExpression
                  edu.vub.at.objects.natives.NATNumeric
                      edu.vub.at.objects.natives.NATNumber

All Implemented Interfaces:

ATAbstractGrammar, ATConversions, ATExpression, ATNil, ATNumber, ATNumeric, ATObject, ATStatement, java.io.Serializable

public final class NATNumber

extends NATNumeric

implements ATNumber

The native implementation of an AmbientTalk number. A number is implemented by a Java int.

Author:

smostinc

See Also:

Serialized Form

Field Summary

int	javaValue
static NATNumber	MONE
static NATNumber	ONE
static NATNumber	ZERO

Fields inherited from class edu.vub.at.objects.natives.NATNil

_INSTANCE_

Constructor Summary

private

NATNumber(int javaNumber)

Method Summary

NATNumber	asNativeNumber()
static NATNumber	atValue(int javaNumber) This method currently serves as a hook for number creation.
ATNumber	base__opdiv__opmns_(ATNumber n) NBR(n) /- NBR(d) => NBR(n / d)
ATNumeric	base__opdiv_(ATNumeric other)
ATNumeric	base__opltx__opeql__opgtx_(ATNumeric other)
ATNumeric	base__opmns_(ATNumeric other)
ATNumeric	base__oppls_(ATNumeric other)
ATFraction	base__opque__opque_(ATNumber nbr) NBR(start) ??
ATNumber	base__oprem_(ATNumber n) NBR(n) % NBR(r) => NBR(n % r)
ATTable	base__optms__optms__optms_(ATNumber end) NBR(start) *** NBR(stop) => [ start, ..., stop ] Example: 2 *** 5 => [ 2, 3, 4, 5 ] 5 *** 2 => [ 5, 4, 3, 2 ]
ATTable	base__optms__optms_(ATNumber end) NBR(start) ** NBR(stop) => [ start, ..., stop [ Example: 2 ** 5 => [ 2, 3, 4 ] 5 ** 2 => [ 5, 4, 3 ]
ATNumeric	base__optms_(ATNumeric other)
ATNumeric	base_abs() NBR(n).abs() => NBR(abs(n))
ATNumeric	base_addFraction(ATFraction other)
ATNumeric	base_addNumber(ATNumber other)
ATNumber	base_asNumber()
ATNumeric	base_dec() NBR(n).dec() => NBR(n-1)
ATNumeric	base_divideFraction(ATFraction other)
ATNumeric	base_divideNumber(ATNumber other)
ATNil	base_doTimes_(ATClosure code) NBR(n).doTimes: { |i| code } => for i = 1 to n do code.eval(i) ; nil
ATNumeric	base_gequalsFraction(ATFraction other)
ATNumeric	base_gequalsNumber(ATNumber other)
ATNumeric	base_inc() NBR(n).inc() => NBR(n+1)
ATNumeric	base_subtractFraction(ATFraction other)
ATNumeric	base_subtractNumber(ATNumber other)
ATNumeric	base_timesFraction(ATFraction other)
ATNumeric	base_timesNumber(ATNumber other)
ATNil	base_to_do_(ATNumber end, ATClosure code) NBR(start).to: NBR(stop) do: { |i| code } => for i = start to stop do code.eval(i) ; nil Also works if stop > start, in which case it becomes a downTo.
ATNil	base_to_step_do_(ATNumber end, ATNumber inc, ATClosure code) NBR(start).to: NBR(stop) step: NBR(inc) do: { |i| code } => for i = start; i < stop; i++ do code.eval(i) ; nil Also works if stop > start, in which case it becomes a downTo.
boolean	equals(java.lang.Object other) By default, two AmbientTalk objects are equal if they are the same object, or one is a proxy for the same object.
protected double	getJavaValue() Template method that should return the value of the underlying number or fraction as a double
ATTable	meta_getStripes() Returns the stripes of this object.
NATText	meta_print() Prints out the object in a human-readable way.

Methods inherited from class edu.vub.at.objects.natives.NATNumeric

asNativeNumeric, base__opeql_, base__opgtx__opeql_, base__opgtx_, base__opltx__opeql_, base__opltx_, base__opnot__opeql_, base_cos, base_expt, base_log, base_sin, base_sqrt, base_tan

Methods inherited from class edu.vub.at.objects.natives.grammar.AGExpression

base_asExpression

Methods inherited from class edu.vub.at.objects.natives.NATByCopy

meta_pass, meta_resolve

Methods inherited from class edu.vub.at.objects.natives.NATNil

asAmbientTalkObject, asJavaClassUnderSymbiosis, asJavaObjectUnderSymbiosis, asNativeBoolean, asNativeException, asNativeFarReference, asNativeFraction, asNativeTable, asNativeText, base__opeql__opeql_, base_asActorMirror, base_asAsyncMessage, base_asBegin, base_asBoolean, base_asClosure, base_asDefinition, base_asFarReference, base_asField, base_asHandler, base_asMessage, base_asMessageCreation, base_asMethod, base_asMirror, base_asSplice, base_asStatement, base_asStripe, base_asSymbol, base_asTable, base_asUnquoteSplice, base_asVariableAssignment, base_init, base_isBoolean, base_isCallFrame, base_isClosure, base_isFarReference, base_isMessageCreation, base_isMethod, base_isMirror, base_isSplice, base_isStripe, base_isSymbol, base_isTable, base_isUnquoteSplice, base_isVariableAssignment, base_new, createChild, isAmbientTalkObject, isJavaObjectUnderSymbiosis, isNativeBoolean, isNativeField, isNativeText, meta_addField, meta_addMethod, meta_assignField, meta_assignVariable, meta_clone, meta_defineField, meta_doesNotUnderstand, meta_eval, meta_extend, meta_getDynamicParent, meta_getLexicalParent, meta_grabField, meta_grabMethod, meta_invoke, meta_isCloneOf, meta_isRelatedTo, meta_isStripedWith, meta_listFields, meta_listMethods, meta_lookup, meta_newInstance, meta_quote, meta_receive, meta_respondsTo, meta_select, meta_send, meta_share, readResolve, toString, writeReplace

Methods inherited from class java.lang.Object

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

Methods inherited from interface edu.vub.at.objects.ATNumeric

base__opeql_, base__opgtx__opeql_, base__opgtx_, base__opltx__opeql_, base__opltx_, base__opnot__opeql_, base_cos, base_expt, base_log, base_sin, base_sqrt, base_tan

Methods inherited from interface edu.vub.at.objects.ATObject

base__opeql__opeql_, base_init, base_new, meta_addField, meta_addMethod, meta_assignField, meta_assignVariable, meta_clone, meta_defineField, meta_doesNotUnderstand, meta_eval, meta_extend, meta_getDynamicParent, meta_getLexicalParent, meta_grabField, meta_grabMethod, meta_invoke, meta_isCloneOf, meta_isRelatedTo, meta_isStripedWith, meta_listFields, meta_listMethods, meta_lookup, meta_newInstance, meta_pass, meta_quote, meta_receive, meta_resolve, meta_respondsTo, meta_select, meta_send, meta_share

Methods inherited from interface edu.vub.at.objects.coercion.ATConversions

asAmbientTalkObject, asJavaClassUnderSymbiosis, asJavaObjectUnderSymbiosis, asNativeBoolean, asNativeException, asNativeFarReference, asNativeFraction, asNativeNumeric, asNativeTable, asNativeText, base_asActorMirror, base_asAsyncMessage, base_asBegin, base_asBoolean, base_asClosure, base_asDefinition, base_asExpression, base_asFarReference, base_asField, base_asHandler, base_asMessage, base_asMessageCreation, base_asMethod, base_asMirror, base_asSplice, base_asStatement, base_asStripe, base_asSymbol, base_asTable, base_asUnquoteSplice, base_asVariableAssignment, base_isBoolean, base_isCallFrame, base_isClosure, base_isFarReference, base_isMessageCreation, base_isMethod, base_isMirror, base_isSplice, base_isStripe, base_isSymbol, base_isTable, base_isUnquoteSplice, base_isVariableAssignment, isAmbientTalkObject, isJavaObjectUnderSymbiosis, isNativeBoolean, isNativeField, isNativeText

Field Detail

ZERO

public static final NATNumber ZERO

ONE

public static final NATNumber ONE

MONE

public static final NATNumber MONE

javaValue

public final int javaValue

Constructor Detail

NATNumber

private NATNumber(int javaNumber)

Method Detail

atValue

public static final NATNumber atValue(int javaNumber)

This method currently serves as a hook for number creation. Currently number objects are not reused, but this might change in the future.

equals

public boolean equals(java.lang.Object other)

Description copied from class: NATNil

By default, two AmbientTalk objects are equal if they are the same object, or one is a proxy for the same object.

Overrides:

equals in class NATNil

base_asNumber

public ATNumber base_asNumber()
                       throws XTypeMismatch

Specified by:

base_asNumber in interface ATConversions

Overrides:

base_asNumber in class NATNil

Throws:

XTypeMismatch

asNativeNumber

public NATNumber asNativeNumber()

Specified by:

asNativeNumber in interface ATConversions

Overrides:

asNativeNumber in class NATNil

meta_print

public NATText meta_print()
                   throws InterpreterException

Description copied from interface: ATObject

Prints out the object in a human-readable way.

Specified by:

meta_print in interface ATObject

Overrides:

meta_print in class NATNil

Throws:

InterpreterException

meta_getStripes

public ATTable meta_getStripes()
                        throws InterpreterException

Description copied from interface: ATObject

Returns the stripes of this object. Note that only the stripes that were attached directly to this object are returned, not all of the parent's stripes as well.

Specified by:

meta_getStripes in interface ATObject

Overrides:

meta_getStripes in class NATNumeric

Throws:

InterpreterException

getJavaValue

protected double getJavaValue()

Description copied from class: NATNumeric

Template method that should return the value of the underlying number or fraction as a double

Specified by:

getJavaValue in class NATNumeric

base_doTimes_

public ATNil base_doTimes_(ATClosure code)
                    throws InterpreterException

NBR(n).doTimes: { |i| code } => for i = 1 to n do code.eval(i) ; nil

Specified by:

base_doTimes_ in interface ATNumber

Throws:

InterpreterException

base_to_do_

public ATNil base_to_do_(ATNumber end,
                         ATClosure code)
                  throws InterpreterException

NBR(start).to: NBR(stop) do: { |i| code } => for i = start to stop do code.eval(i) ; nil Also works if stop > start, in which case it becomes a downTo. If start = stop, the code is not executed.

Specified by:

base_to_do_ in interface ATNumber

Throws:

InterpreterException

base_to_step_do_

public ATNil base_to_step_do_(ATNumber end,
                              ATNumber inc,
                              ATClosure code)
                       throws InterpreterException

NBR(start).to: NBR(stop) step: NBR(inc) do: { |i| code } => for i = start; i < stop; i++ do code.eval(i) ; nil Also works if stop > start, in which case it becomes a downTo.

Specified by:

base_to_step_do_ in interface ATNumber

Throws:

InterpreterException

base__optms__optms_

public ATTable base__optms__optms_(ATNumber end)
                            throws InterpreterException

NBR(start) ** NBR(stop) => [ start, ..., stop [ Example: 2 ** 5 => [ 2, 3, 4 ] 5 ** 2 => [ 5, 4, 3 ]

Specified by:

base__optms__optms_ in interface ATNumber

Throws:

InterpreterException

base__optms__optms__optms_

public ATTable base__optms__optms__optms_(ATNumber end)
                                   throws InterpreterException

NBR(start) *** NBR(stop) => [ start, ..., stop ] Example: 2 *** 5 => [ 2, 3, 4, 5 ] 5 *** 2 => [ 5, 4, 3, 2 ]

Specified by:

base__optms__optms__optms_ in interface ATNumber

Throws:

InterpreterException

base_inc

public ATNumeric base_inc()

NBR(n).inc() => NBR(n+1)

Specified by:

base_inc in interface ATNumber

base_dec

public ATNumeric base_dec()

NBR(n).dec() => NBR(n-1)

Specified by:

base_dec in interface ATNumber

base_abs

public ATNumeric base_abs()

NBR(n).abs() => NBR(abs(n))

Specified by:

base_abs in interface ATNumber

base__opque__opque_

public ATFraction base__opque__opque_(ATNumber nbr)
                               throws InterpreterException

NBR(start) ?? NBR(stop) => FRC(n) where n chosen randomly in [ start, stop [

Specified by:

base__opque__opque_ in interface ATNumber

Throws:

InterpreterException

base__oprem_

public ATNumber base__oprem_(ATNumber n)
                      throws InterpreterException

NBR(n) % NBR(r) => NBR(n % r)

Specified by:

base__oprem_ in interface ATNumber

Throws:

InterpreterException

base__opdiv__opmns_

public ATNumber base__opdiv__opmns_(ATNumber n)
                             throws InterpreterException

NBR(n) /- NBR(d) => NBR(n / d)

Specified by:

base__opdiv__opmns_ in interface ATNumber

Throws:

InterpreterException

base__oppls_

public ATNumeric base__oppls_(ATNumeric other)
                       throws InterpreterException

Specified by:

base__oppls_ in interface ATNumeric

Throws:

InterpreterException

base_addNumber

public ATNumeric base_addNumber(ATNumber other)
                         throws InterpreterException

Specified by:

base_addNumber in interface ATNumeric

Throws:

InterpreterException

base_addFraction

public ATNumeric base_addFraction(ATFraction other)
                           throws InterpreterException

Specified by:

base_addFraction in interface ATNumeric

Throws:

InterpreterException

base__opmns_

public ATNumeric base__opmns_(ATNumeric other)
                       throws InterpreterException

Specified by:

base__opmns_ in interface ATNumeric

Throws:

InterpreterException

base_subtractNumber

public ATNumeric base_subtractNumber(ATNumber other)
                              throws InterpreterException

Specified by:

base_subtractNumber in interface ATNumeric

Throws:

InterpreterException

base_subtractFraction

public ATNumeric base_subtractFraction(ATFraction other)
                                throws InterpreterException

Specified by:

base_subtractFraction in interface ATNumeric

Throws:

InterpreterException

base__optms_

public ATNumeric base__optms_(ATNumeric other)
                       throws InterpreterException

Specified by:

base__optms_ in interface ATNumeric

Throws:

InterpreterException

base_timesNumber

public ATNumeric base_timesNumber(ATNumber other)
                           throws InterpreterException

Specified by:

base_timesNumber in interface ATNumeric

Throws:

InterpreterException

base_timesFraction

public ATNumeric base_timesFraction(ATFraction other)
                             throws InterpreterException

Specified by:

base_timesFraction in interface ATNumeric

Throws:

InterpreterException

base__opdiv_

public ATNumeric base__opdiv_(ATNumeric other)
                       throws InterpreterException

Specified by:

base__opdiv_ in interface ATNumeric

Throws:

InterpreterException

base_divideNumber

public ATNumeric base_divideNumber(ATNumber other)
                            throws InterpreterException

Specified by:

base_divideNumber in interface ATNumeric

Throws:

InterpreterException

base_divideFraction

public ATNumeric base_divideFraction(ATFraction other)
                              throws InterpreterException

Specified by:

base_divideFraction in interface ATNumeric

Throws:

InterpreterException

base__opltx__opeql__opgtx_

public ATNumeric base__opltx__opeql__opgtx_(ATNumeric other)
                                     throws InterpreterException

Specified by:

base__opltx__opeql__opgtx_ in interface ATNumeric

Throws:

InterpreterException

base_gequalsNumber

public ATNumeric base_gequalsNumber(ATNumber other)
                             throws InterpreterException

Specified by:

base_gequalsNumber in interface ATNumeric

Throws:

InterpreterException

base_gequalsFraction

public ATNumeric base_gequalsFraction(ATFraction other)
                               throws InterpreterException

Specified by:

base_gequalsFraction in interface ATNumeric

Throws:

InterpreterException