WIP: attempt at IPA extended StreamID support
diff --git a/library/IPA_CodecPort.ttcn b/library/IPA_CodecPort.ttcn
index ad94a92..de47a16 100644
--- a/library/IPA_CodecPort.ttcn
+++ b/library/IPA_CodecPort.ttcn
@@ -7,12 +7,14 @@
 	type record IPA_RecvFrom {
 		ConnectionId	connId,
 		IpaStreamId	streamId,
+		IpaExtStreamId	streamIdExt optional,
 		octetstring	msg
 	}
 
 	type record IPA_Send {
 		ConnectionId	connId,
 		IpaStreamId	streamId,
+		IpaExtStreamId	streamIdExt optional,
 		octetstring	msg
 	}
 
@@ -33,11 +35,12 @@
 		var PDU_IPA ipa := dec_PDU_IPA(pin.msg);
 		pout.connId := pin.connId;
 		pout.streamId := ipa.streamId
+		pout.streamIdExt := ipa.streamIdExt
 		pout.msg := ipa.payloadData;
 	} with { extension "prototype(fast)" }
 
 	private function IPA_to_IPL4_Send(in IPA_Send pin, out ASP_Send pout) {
-		var PDU_IPA ipa := { 0, pin.streamId, pin.msg };
+		var PDU_IPA ipa := { 0, pin.streamId, pin.streamIdExt, pin.msg };
 		pout.connId := pin.connId;
 		pout.proto := { tcp := {} };
 		pout.msg := enc_PDU_IPA(ipa);