Attachment #292757 for bug #374143

Lines 30-36 Link Here

(-)a/binsrc/cached_resources/res_to_c.awk (-1 / +8 lines)
30	}	30	}
31	{	31	{
32	fun = $0	32	fun = $0
33	gsub ( /\\/, "\\\\", fun)	33
		34	q = "\\\\"
		35	if (PROCINFO["version"] ~ /^4/)
		36	gsub ( q, q q, fun)
		37	else
		38	gsub ( q, q, fun)
		39	#WAS: gsub ( /\\/, "\\\\", fun)
		40
34	gsub ( /"/, "\\\"", fun)	41	gsub ( /"/, "\\\"", fun)
35	gsub ( /\$/, "\\044", fun)	42	gsub ( /\$/, "\\044", fun)
36	gsub ( /.*/, "\"&\\n\",", fun)	43	gsub ( /.*/, "\"&\\n\",", fun)

Lines 42-48 Link Here

(-)a/binsrc/hosting/perl/pl_to_c.awk (-1 / +8 lines)
42	}	42	}
43		43
44	x = $0	44	x = $0
45	gsub (/\\/, "\\\\", x)	45
		46	q = "\\\\"
		47	if (PROCINFO["version"] ~ /^4/)
		48	gsub ( q, q q, x)
		49	else
		50	gsub ( q, q, x)
		51	#WAS: gsub (/\\/, "\\\\", x)
		52
46	gsub (/\"/, "\\\"", x)	53	gsub (/\"/, "\\\"", x)
47	print "\"" x "\\n\""	54	print "\"" x "\\n\""
48	}	55	}

Lines 48-54 Link Here

(-)a/binsrc/hosting/python/py_to_c.awk (-1 / +8 lines)
48	}	48	}
49		49
50	x = $0	50	x = $0
51	gsub (/\\/, "\\\\", x)	51
		52	q = "\\\\"
		53	if (PROCINFO["version"] ~ /^4/)
		54	gsub ( q, q q, x)
		55	else
		56	gsub ( q, q, x)
		57	#WAS: gsub (/\\/, "\\\\", x)
		58
52	gsub (/\"/, "\\\"", x)	59	gsub (/\"/, "\\\"", x)
53	print "\"" x "\\n\""	60	print "\"" x "\\n\""
54	}	61	}

Lines 54-60 Link Here

(-)a/binsrc/ws/wsrm/xsd2sql.awk (-1 / +8 lines)
54	print " ses := string_output ();"	54	print " ses := string_output ();"
55	}	55	}
56	str = $0	56	str = $0
57	gsub ( /\\/, "\\\\", str)	57
		58	q = "\\\\"
		59	if (PROCINFO["version"] ~ /^4/)
		60	gsub ( q, q q, str)
		61	else
		62	gsub ( q, q, str)
		63	#WAS: gsub ( /\\/, "\\\\", str)
		64
58	gsub ( /'/, "\\'", str)	65	gsub ( /'/, "\\'", str)
59		66
60	#	67	#




		    if (length() < 2)
		      next
		  }

                # does escape the symbols
		fun = $0
		q = "\\\\"
		if (PROCINFO["version"] ~ /^4/)
		    gsub ( q, q q, fun)
		else
		    gsub ( q, q, fun)

		#WAS: gsub ( /\\/, "\\\\", fun)

		# remove whitespace except when there is just a semicolon
		if ((in_xsl_mode == 0) && (in_xsd_mode == 0))
  		  {

Return to bug 374143

Lines 340-348 Link Here

(-)a/libsrc/Wi/sql_to_c.awk (-1 / +9 lines)
340	if (length() < 2)	340	if (length() < 2)
341	next	341	next
342	}	342	}
		343
343	# does escape the symbols	344	# does escape the symbols
344	fun = $0	345	fun = $0
345	gsub ( /\\/, "\\\\", fun)	346	q = "\\\\"
		347	if (PROCINFO["version"] ~ /^4/)
		348	gsub ( q, q q, fun)
		349	else
		350	gsub ( q, q, fun)
		351
		352	#WAS: gsub ( /\\/, "\\\\", fun)
		353
346	# remove whitespace except when there is just a semicolon	354	# remove whitespace except when there is just a semicolon
347	if ((in_xsl_mode == 0) && (in_xsd_mode == 0))	355	if ((in_xsl_mode == 0) && (in_xsd_mode == 0))
348	{	356	{