Enhance the TCL scrip that generates sqlite3-all.c so that it outputs all

text in its original order.

FossilOrigin-Name: 83ff1a28e3e7a99fa90d5079897d76529c4256eed859bf7cb98b860fbedfdc5b

diff --git a/manifest b/manifest
index 56a95c79b6e9954c401cdca6d9601e626c8b881f..8806838d861f93384d222dc55f1972fc0de14d2f 100644 (file)
--- a/manifest
+++ b/manifest
@@ -1,5 +1,5 @@
-C Fix\srequirements\smarks\sthat\schanged\sdue\sto\stypo\sfixes\sin\sthe\sdocumentation.
-D 2022-06-22T18:33:21.684
+C Enhance\sthe\sTCL\sscrip\sthat\sgenerates\ssqlite3-all.c\sso\sthat\sit\soutputs\sall\ntext\sin\sits\soriginal\sorder.
+D 2022-06-22T18:51:47.144
 F .fossil-settings/empty-dirs dbb81e8fc0401ac46a1491ab34a7f2c7c0452f2f06b54ebb845d024ca8283ef1
 F .fossil-settings/ignore-glob 35175cdfcf539b2318cb04a9901442804be81cd677d8b889fcc9149c21f239ea
 F LICENSE.md df5091916dbb40e6e9686186587125e1b2ff51f022cc334e886c19a0e9982724
@@ -1942,7 +1942,7 @@ F tool/speedtest16.c ecb6542862151c3e6509bbc00509b234562ae81e
 F tool/speedtest2.tcl ee2149167303ba8e95af97873c575c3e0fab58ff
 F tool/speedtest8.c 2902c46588c40b55661e471d7a86e4dd71a18224
 F tool/speedtest8inst1.c 7ce07da76b5e745783e703a834417d725b7d45fd
-F tool/split-sqlite3c.tcl 3efcd4240b738f6bb2b5af0aea7e1e0ef9bc1c61654f645076cec883030b710c
+F tool/split-sqlite3c.tcl 6b02bb5444cabc477c0d6eb3ecedcc827063e9ac41954831e90c72c481aa9d30
 F tool/sqldiff.c 4f967c199c5f93eec64978e3a625d6c07fb1162212b1d48f65740d9eb4607eee
 F tool/sqlite3_analyzer.c.in f88615bf33098945e0a42f17733f472083d150b58bdaaa5555a7129d0a51621c
 F tool/sqltclsh.c.in 1bcc2e9da58fadf17b0bf6a50e68c1159e602ce057210b655d50bad5aaaef898
@@ -1978,8 +1978,8 @@ F vsixtest/vsixtest.tcl 6a9a6ab600c25a91a7acc6293828957a386a8a93
 F vsixtest/vsixtest.vcxproj.data 2ed517e100c66dc455b492e1a33350c1b20fbcdc
 F vsixtest/vsixtest.vcxproj.filters 37e51ffedcdb064aad6ff33b6148725226cd608e
 F vsixtest/vsixtest_TemporaryKey.pfx e5b1b036facdb453873e7084e1cae9102ccc67a0
-P 5c9133ef431a031249760267ca851239d0857ffba633cac27d3865cf179c3274
-R 05fb481e132d02ee2b4ecd44d8b7de24
+P 5247df05991df979024df5a30bb3473401add92d4c12b01c040a16dda6da39f5
+R a8c13c127511ed3f8d625bea05c612fa
 U drh
-Z a7b592876a55718c3da48b4ab5a2abbd
+Z 534627147f20b9113ed0f141bfe27606
 # Remove this line to create a well-formed Fossil manifest.

diff --git a/manifest.uuid b/manifest.uuid
index 115c93d720c887d5589c273da44f8001574d482f..ef08fe0df4703f22e4eb10612a549d9f882cc9f8 100644 (file)
--- a/manifest.uuid
+++ b/manifest.uuid
@@ -1 +1 @@
-5247df05991df979024df5a30bb3473401add92d4c12b01c040a16dda6da39f5
\ No newline at end of file
+83ff1a28e3e7a99fa90d5079897d76529c4256eed859bf7cb98b860fbedfdc5b
\ No newline at end of file

diff --git a/tool/split-sqlite3c.tcl b/tool/split-sqlite3c.tcl
index 230e3f2549c95fcc7f9a0a7d03489c27fe7ada4a..9751e7de9cd3550627b803152fa82164f0939bc4 100644 (file)
--- a/tool/split-sqlite3c.tcl
+++ b/tool/split-sqlite3c.tcl
@@ -74,6 +74,11 @@ while {[regexp $BEGIN $line]} {
   incr N $n
   while {[gets $in line]>=0} {
     if {[regexp $BEGIN $line]} break
+    if {$N>0} {
+      write_one_file $all
+      set N 0
+      set all {}
+    }
     puts $out1 $line
   }
 }