fix with-read desugaring to use pattern guard #438

Job	Run time
build (9.8.2, 3.12, ubuntu-20.04, true)	18m 24s
build (9.8.2, 3.12, ubuntu-20.04, true)	18m 24s
build (9.8.2, 3.12, ubuntu-22.04, true)	18m 23s
build (9.8.2, 3.12, ubuntu-22.04, true)	18m 23s
build (9.8.2, 3.12, macos-14, true)	20m 4s
build (9.8.2, 3.12, macos-14, true)	20m 4s
build (9.10.1, 3.12, ubuntu-20.04, true)	2m 6s
build (9.10.1, 3.12, ubuntu-20.04, true)	3m 30s
build (9.10.1, 3.12, ubuntu-22.04, true)	17m 37s
build (9.10.1, 3.12, ubuntu-22.04, true)	17m 37s
build (9.10.1, 3.12, macos-14, true)	21m 21s
build (9.10.1, 3.12, macos-14, true)	21m 21s
build (9.6.6, 3.12, ubuntu-20.04, true)	18m 46s
build (9.6.6, 3.12, ubuntu-20.04, true)	18m 46s
build (9.6.6, 3.12, ubuntu-22.04, true)	19m 11s
build (9.6.6, 3.12, ubuntu-22.04, true)	19m 11s
build (9.6.6, 3.12, macos-14, true)	19m 7s
build (9.6.6, 3.12, macos-14, true)	19m 7s
Build and publish docker image	0s
Build and publish docker image	0s
nightly	0s
nightly	0s
	5h 11m 22s

Provide feedback