Commit b78a5a24 authored by baire's avatar baire
Browse files

fixed CRLF inside charstrings

parent fa1130d6
Loading
Loading
Loading
Loading
+7 −6
Original line number Diff line number Diff line
@@ -4,6 +4,7 @@ module Simple_Testcases
  	import from LibSip_SIPTypesAndValues all;
//  	import from Simple_Templates all;

	const charstring c_CRLF := oct2char('0D'O) & oct2char('0A'O);

	template SipUrl m_simpleUrl (charstring user, charstring host, integer p) := {
		scheme :=	"sip:",
@@ -46,12 +47,12 @@ module Simple_Testcases
		connect (self:testPort, self:testPort);

		// Test Body
		testPort.send ("From: sip:bl@blah.ah
Via: SIP/2.0/UDP grabu.com
Via: SIP/2.0/UDP pouic-pouic.com
Pouet: blah blah
Via: SIP/2.0/UDP tutu.com
");
		testPort.send (	"From: sip:bl@blah.ah" & c_CRLF &
				"Via: SIP/2.0/UDP grabu.com" & c_CRLF &
				"Via: SIP/2.0/UDP pouic-pouic.com" & c_CRLF & 
				"Pouet: blah blah" & c_CRLF &
				"Via: SIP/2.0/UDP tutu.com" & c_CRLF 
				);
	
		alt {
			[] testPort.receive (MessageHeader: ?) {