Refactor pretest, save sha only on pretest branch of fork

.github/workflows/on commit.yaml

@@ -2,6 +2,8 @@
 
 on:
     push:
+        branches-ignore:
+          - 'subm-pretest/**'
     schedule:
         - cron: '0 0 * * *'
     pull_request:

.github/workflows/update gh-pages.yaml

@@ -2,6 +2,8 @@
 
 on:
     push:
+        branches-ignore:
+          - 'subm-pretest/**'
     workflow_dispatch:
 
 permissions:

Delete subm pretest branches.ps1

@@ -1,4 +1,4 @@
-try {
+try {
 
 	function Delete-Branches {
 		param (
@@ -14,6 +14,11 @@ try {
 		$branch_del = @()
 		foreach ($branch in git branch -r --list "$remote/$pattern") {
 			$branch = $branch.Trim().SubString($remote.Length+1)
+			if ($branch.EndsWith('960')) { continue }
+			if ($branch.EndsWith('962')) { continue }
+			if ($branch.EndsWith('1159')) { continue }
+			if ($branch.EndsWith('1215')) { continue }
+			if ($branch.EndsWith('1223')) { continue }
 			Write-Host "Deleting branch: $branch"
 			$branch_del += $branch
 		}

LastPack.log

@@ -199,19 +199,10 @@ Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: F
 Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: Func [cl::GetAcceleratorInfo + INTEL] could not generate overload: no output type info for Group [cl::AcceleratorInfo] Enum [cl::ACCELERATOR_DESCRIPTOR]
 Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: Dumping Feature items
 Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: 18>12 overloads of non-fixed Func [cl::CompileProgram]
-Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: 18>12 overloads of non-fixed Func [cl::EnqueueFillBuffer]
-Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: 18>12 overloads of non-fixed Func [cl::EnqueueMapImage]
 Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: 18>12 overloads of non-fixed Func [cl::EnqueueMigrateMemObjects]
-Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: 18>12 overloads of non-fixed Func [cl::EnqueueNativeKernel]
-Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: 30>12 overloads of non-fixed Func [cl::EnqueueNDRangeKernel]
-Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: 18>12 overloads of non-fixed Func [cl::EnqueueReadBuffer]
 Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: 18>12 overloads of non-fixed Func [cl::EnqueueSVMFree]
-Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: 18>12 overloads of non-fixed Func [cl::EnqueueSVMMemFill]
-Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: 18>12 overloads of non-fixed Func [cl::EnqueueSVMMigrateMem]
-Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: 18>12 overloads of non-fixed Func [cl::EnqueueWriteBuffer]
 Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: Dumping Extension items
 Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: 18>12 overloads of non-fixed Func [cl::EnqueueSVMFree + ARM]
-Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: 18>12 overloads of non-fixed Func [cl::EnqueueSVMMemFill + ARM]
 Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: 18>12 overloads of non-fixed Func [cl::EnqueueMigrateMemObject + EXT]
 Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: 30>12 overloads of non-fixed Func [cl::EnqueueGenerateMipmap + IMG]
 Template[OpenCL]: TemplateCommand[LowLvl/OpenCL/Pack Essentials.exe]: WARNING: 18>12 overloads of non-fixed Func [cl::EnqueueAcquireGrallocObjects + IMG]

Pack for pretest.ps1

@@ -0,0 +1,55 @@
+try {
+
+
+
+	function Get-RepoChoise {
+		while ($true) {
+			$choice = Read-Host 'Repo ("CL"/"GL")'
+			if ($choice -eq 'CL') {
+				return 'OpenCL-Docs'
+			}
+			if ($choice -eq 'GL') {
+				return 'OpenGL-Registry'
+			}
+			Write-Host 'Invalid input'
+		}
+	}
+
+	function Get-PRNum {
+		while ($true) {
+			$choice = Read-Host 'PR num'
+			if ($choice -match '^\d+$') {
+				return $choice
+			}
+			Write-Host 'Invalid input'
+		}
+	}
+
+	$repo = Get-RepoChoise
+	$pr_num = Get-PRNum
+
+	while ($true) {
+		& '.\PackAll-1 PullUpstream + Pack.bat' "PullUpstreamBranch=${repo}:pretest/${pr_num}"
+
+		while ($true) {
+			$choice = Read-Host '(e)xit / (r)epeat'
+			if ($choice -eq 'e') {
+				exit 0
+			}
+			if ($choice -eq 'r') {
+				break
+			}
+			Write-Host 'Invalid input'
+		}
+
+	}
+
+
+
+}
+catch {
+	Write-Host "An error occurred:"
+	Write-Host $_
+	pause
+	exit 1
+}