ASN1AdaptiveTypeObject>>at: aKey ifAbsent: aBlock is ignoring the ifAbsent block

```smalltalk
at: aKey ifAbsent: aBlock
...
	fieldType := self basicTypeAt: aKey.
...
```

Raises an absent exception instead of using the given handler for it.