VAST primitive

[mea405]

Hi,

Could you give me some sample how return from primitive LargeInteger (int64)?

Thank you,

[wembley]

Maxim -

I'm sorry, but I don't quite understand what you are asking. Do you want an example (in C) of a primitive that returns an int64? Or are you asking for a Smalltalk example of invoking a primitive that answers an int64? Or ?????

[mea405]

Yes, I would like get an example (in C) of a primitive that returns an int64 and an instance of user defined class.

[marten]

Yes, I would like get an example (in C) of a primitive that returns an int64 and an instance of user defined class.

Are you sure you want to write a primitive or would it be ok to call an external c-api library call instead of this ? The last thing is pretty simple, because the c-interface supports int64 for return values and parameters.

I noticed, that the helper files (for "real" primitives) do not have support for conversion to int64.

On the other hand - according to the documentation (chapter 11 - IBM Smalltalk Virtual Machine API) - you may have access only to some classes of the system

SmallInteger, True, False, UndefinedClass, Character, String, Array, ByteArray, Float, LargeInteger and DBString.

Thinking about that one would be able to return your int64 number as an instance of LargeInteger ...

Consider it twice, if you want to build primitives or simple external dll's ...


Marten

[mea405]

Are you sure you want to write a primitive or would it be ok to call an external c-api library call instead of this ? The last thing is pretty simple, because the c-interface supports int64 for return values and parameters.

We are using EsPostAsyncMessage to process driver callback in our DLL. Now we implemented creating LargeInteger in such way
//.............
EsObject samplePos;
samplePos = EsAllocateObject(
EsPrimVMContext,
EsPrimClassLargeInteger,
2, // size
0, // saves or NULL for saveList
(EsObject **) NULL);
if (samplePos != (EsObject) NULL)
{
EsLongAtPut(samplePos, 1, timeInfo->timeInfo.samplePosition.lo);
EsLongAtPut(samplePos, 2, timeInfo->timeInfo.samplePosition.hi);
};
//.............
It is necessary to transfer in the VAST some such values. Now we use for this purpose an Array, but would be elegant to transfer these values as instance variables of our class.

[marten]

Are you sure you want to write a primitive or would it be ok to call an external c-api library call instead of this ? The last thing is pretty simple, because the c-interface supports int64 for return values and parameters.

We are using EsPostAsyncMessage to process driver callback in our DLL. Now we implemented creating LargeInteger in such way
//.............
EsObject samplePos;
samplePos = EsAllocateObject(
EsPrimVMContext,
EsPrimClassLargeInteger,
2, // size
0, // saves or NULL for saveList
(EsObject **) NULL);
if (samplePos != (EsObject) NULL)
{
EsLongAtPut(samplePos, 1, timeInfo->timeInfo.samplePosition.lo);
EsLongAtPut(samplePos, 2, timeInfo->timeInfo.samplePosition.hi);
};
//.............
It is necessary to transfer in the VAST some such values. Now we use for this purpose an Array, but would be elegant to transfer these values as instance variables of our class.

Would it be possible to write a simple DLL and use instances of EsEntryPoint (to create callbacks to the image) to handle that ?

[mea405]

Would it be possible towrite a simple DLL and use instances of EsEntryPoint (to create callbacks to the image) to handle that ?

Obviously, it is impossible :]

[marten]

Would it be possible towrite a simple DLL and use instances of EsEntryPoint (to create callbacks to the image) to handle that ?

Obviously, it is impossible :]

Why ? I really would like to know! What are the advantages, drawbacks ?

[mea405]

Would it be possible towrite a simple DLL and use instances of EsEntryPoint (to create callbacks to the image) to handle that ?

Obviously, it is impossible :]

Why ? I really would like to know! What are the advantages, drawbacks ?

From 'Programmer Reference':
External functions calling Smalltalk using EsEntryPoint must run in the same thread as Smalltalk.

We can attest - it is true.