Primitives in TMaps
BlitzMax Forums/BlitzMax Programming/Primitives in TMaps
| ||
| This probably has an easy answer, but I'm having a tough time finding it. TMap uses key:object and value:object. If you want your value to be a primitive like an int, what's the easiest way to go about converting it? I could put it in as a string and then cast it when using it, but that seemed kinda kludgey. Thanks. |
| ||
(to remove the possible overhead with a string object)Type TInt Field Value:int End Type Or use a string.. there is no other way. |
| ||
| You could always copy the code from the TMap module and adapt it to use Ints. |
| ||
| Ok - thanks, guys. I just wanted to be sure there wasn't some ridiculously simple way I was just missing. I'll tinker with it. |
| ||
| You could look at the TMap code and copy it and change object to int. |
| ||
| You could use a single element array to store the primitive in. |
| ||
| How would you add the array to the TMap? Its type will still be an integer. |
| ||
| no not really. All array extend from the Class Array -> IntArray, FloatArray etc. Otherwise you couldn't slice them as that is a capability of that class not some magical memory hacking. |
| ||
| How would you add the array to the TMap? Its type will still be an integer. Arrays are objects. You could simply do:MapInsert( map,key,[1]) |
| ||
At first it seems that Azathoth's idea wouldn't work, but after much fiddling, I finally got an example to work.SuperStrict Local map:TMap = CreateMap() 'create the map Local i:Int 'Used as the index in loops Local Value:Int 'An Int variable to show that the result is actually an Int and not an object For i = 0 To 10 'fill the map with values 0-10 using keys "Key0" - "Key10" MapInsert(Map,"Key"+i,[i]) 'Save i as a single element array Next For i = 0 To 10 'Read the given keys "Key0' - "Key10" Value = Int[](MapValueForKey(Map,"Key"+i))[0] 'Cast the object to an Int array, and access element 0 Print Value 'print the result Next |
| ||
| You have to have a sort method. Otherwise it won't know that 1=1. Type TInt Field Value:int Method Compare:Int(o:Object) if TInt(o)>value return 1 if TInt(o)<value return -1 return 0 EndMethod End Type |
   |