Add tests for IMPORT_PATH.

python-processing-unit · python-processing-unit · commit 63d850141d0c · 2026-04-15T16:17:33.000-04:00
diff --git a/tests/cases/failing/import_path-alias-type-bool.pre b/tests/cases/failing/import_path-alias-type-bool.pre
@@ -0,0 +1,6 @@
+IMPORT(path)
+
+STR: tests_dir = path.BASEPATH(path.BASEPATH(path.script_dir))
+STR: helper_path = JOIN(tests_dir, "/helpers/import_path_basic_target.pre")
+
+IMPORT_PATH(helper_path, TRUE)
diff --git a/tests/cases/failing/import_path-alias-type-flt.pre b/tests/cases/failing/import_path-alias-type-flt.pre
@@ -0,0 +1,6 @@
+IMPORT(path)
+
+STR: tests_dir = path.BASEPATH(path.BASEPATH(path.script_dir))
+STR: helper_path = JOIN(tests_dir, "/helpers/import_path_basic_target.pre")
+
+IMPORT_PATH(helper_path, 0d1.0)
diff --git a/tests/cases/failing/import_path-alias-type-func.pre b/tests/cases/failing/import_path-alias-type-func.pre
@@ -0,0 +1,6 @@
+IMPORT(path)
+
+STR: tests_dir = path.BASEPATH(path.BASEPATH(path.script_dir))
+STR: helper_path = JOIN(tests_dir, "/helpers/import_path_basic_target.pre")
+
+IMPORT_PATH(helper_path, LAMBDA BOOL: (){})
diff --git a/tests/cases/failing/import_path-alias-type-int.pre b/tests/cases/failing/import_path-alias-type-int.pre
@@ -0,0 +1,6 @@
+IMPORT(path)
+
+STR: tests_dir = path.BASEPATH(path.BASEPATH(path.script_dir))
+STR: helper_path = JOIN(tests_dir, "/helpers/import_path_basic_target.pre")
+
+IMPORT_PATH(helper_path, 0d1)
diff --git a/tests/cases/failing/import_path-alias-type-map.pre b/tests/cases/failing/import_path-alias-type-map.pre
@@ -0,0 +1,6 @@
+IMPORT(path)
+
+STR: tests_dir = path.BASEPATH(path.BASEPATH(path.script_dir))
+STR: helper_path = JOIN(tests_dir, "/helpers/import_path_basic_target.pre")
+
+IMPORT_PATH(helper_path, <>)
diff --git a/tests/cases/failing/import_path-alias-type-str.pre b/tests/cases/failing/import_path-alias-type-str.pre
@@ -0,0 +1,6 @@
+IMPORT(path)
+
+STR: tests_dir = path.BASEPATH(path.BASEPATH(path.script_dir))
+STR: helper_path = JOIN(tests_dir, "/helpers/import_path_basic_target.pre")
+
+IMPORT_PATH(helper_path, "helper")
diff --git a/tests/cases/failing/import_path-alias-type-thr.pre b/tests/cases/failing/import_path-alias-type-thr.pre
@@ -0,0 +1,6 @@
+IMPORT(path)
+
+STR: tests_dir = path.BASEPATH(path.BASEPATH(path.script_dir))
+STR: helper_path = JOIN(tests_dir, "/helpers/import_path_basic_target.pre")
+
+IMPORT_PATH(helper_path, ASYNC{})
diff --git a/tests/cases/failing/import_path-alias-type-tns.pre b/tests/cases/failing/import_path-alias-type-tns.pre
@@ -0,0 +1,6 @@
+IMPORT(path)
+
+STR: tests_dir = path.BASEPATH(path.BASEPATH(path.script_dir))
+STR: helper_path = JOIN(tests_dir, "/helpers/import_path_basic_target.pre")
+
+IMPORT_PATH(helper_path, [0d1])
diff --git a/tests/cases/failing/import_path-arity-three.pre b/tests/cases/failing/import_path-arity-three.pre
@@ -0,0 +1 @@
+IMPORT_PATH("g:/missing.pre", helper, extra)
diff --git a/tests/cases/failing/import_path-arity-zero.pre b/tests/cases/failing/import_path-arity-zero.pre
@@ -0,0 +1 @@
+IMPORT_PATH()
diff --git a/tests/cases/failing/import_path-missing-file.pre b/tests/cases/failing/import_path-missing-file.pre
@@ -0,0 +1,6 @@
+IMPORT(path)
+
+STR: tests_dir = path.BASEPATH(path.BASEPATH(path.script_dir))
+STR: missing_path = JOIN(tests_dir, "/helpers/import_path_missing_target.pre")
+
+IMPORT_PATH(missing_path)
diff --git a/tests/cases/failing/import_path-qualified-only.pre b/tests/cases/failing/import_path-qualified-only.pre
@@ -0,0 +1,8 @@
+IMPORT(path)
+
+STR: tests_dir = path.BASEPATH(path.BASEPATH(path.script_dir))
+STR: helper_path = JOIN(tests_dir, "/helpers/import_path_hidden_target.pre")
+
+IMPORT_PATH(helper_path)
+
+ASSERT(EQ(hidden, 0d7))
diff --git a/tests/cases/failing/import_path-type-bool.pre b/tests/cases/failing/import_path-type-bool.pre
@@ -0,0 +1 @@
+IMPORT_PATH(TRUE)
diff --git a/tests/cases/failing/import_path-type-flt.pre b/tests/cases/failing/import_path-type-flt.pre
@@ -0,0 +1 @@
+IMPORT_PATH(0d1.0)
diff --git a/tests/cases/failing/import_path-type-func.pre b/tests/cases/failing/import_path-type-func.pre
@@ -0,0 +1 @@
+IMPORT_PATH(LAMBDA BOOL: (){})
diff --git a/tests/cases/failing/import_path-type-int.pre b/tests/cases/failing/import_path-type-int.pre
@@ -0,0 +1 @@
+IMPORT_PATH(0d1)
diff --git a/tests/cases/failing/import_path-type-map.pre b/tests/cases/failing/import_path-type-map.pre
@@ -0,0 +1 @@
+IMPORT_PATH(<>)
diff --git a/tests/cases/failing/import_path-type-thr.pre b/tests/cases/failing/import_path-type-thr.pre
@@ -0,0 +1 @@
+IMPORT_PATH(ASYNC{})
diff --git a/tests/cases/failing/import_path-type-tns.pre b/tests/cases/failing/import_path-type-tns.pre
@@ -0,0 +1 @@
+IMPORT_PATH([0d1])
diff --git a/tests/cases/passing/import_path-alias-qualified-namespace.pre b/tests/cases/passing/import_path-alias-qualified-namespace.pre
@@ -0,0 +1,7 @@
+IMPORT(path)
+
+STR: tests_dir = path.BASEPATH(path.BASEPATH(path.script_dir))
+STR: helper_path = JOIN(tests_dir, "/helpers/import_path_basic_target.pre")
+
+ASSERT(NOT(IMPORT_PATH(helper_path, helper)))
+ASSERT(EQ(helper.identify(), "basic"))
diff --git a/tests/cases/passing/import_path-cached-alias.pre b/tests/cases/passing/import_path-cached-alias.pre
@@ -0,0 +1,19 @@
+IMPORT(path)
+
+STR: tests_dir = path.BASEPATH(path.BASEPATH(path.script_dir))
+STR: helper_path = JOIN(tests_dir, "/helpers/import_path_cache_target.pre")
+STR: marker_path = path.TEMPFILE("prefix-import-path-cache-target.txt")
+
+IF(EXISTFILE(marker_path)){
+    ASSERT(DELETEFILE(marker_path))
+}
+
+ASSERT(NOT(IMPORT_PATH(helper_path)))
+ASSERT(NOT(IMPORT_PATH(helper_path, again)))
+
+STR: default_view = import_path_cache_target.marker_text()
+STR: alias_view = again.marker_text()
+
+ASSERT(DELETEFILE(marker_path))
+ASSERT(EQ(default_view, "loaded"))
+ASSERT(EQ(alias_view, "loaded"))
diff --git a/tests/cases/passing/import_path-default-basename.pre b/tests/cases/passing/import_path-default-basename.pre
@@ -0,0 +1,7 @@
+IMPORT(path)
+
+STR: tests_dir = path.BASEPATH(path.BASEPATH(path.script_dir))
+STR: helper_path = JOIN(tests_dir, "/helpers/import_path_basic_target.pre")
+
+ASSERT(NOT(IMPORT_PATH(helper_path)))
+ASSERT(EQ(import_path_basic_target.identify(), "basic"))
diff --git a/tests/cases/passing/import_path-equivalent-path-cache.ps1 b/tests/cases/passing/import_path-equivalent-path-cache.ps1
@@ -0,0 +1,45 @@
+$helperPath = Join-Path (Split-Path -Parent (Split-Path -Parent $PSScriptRoot)) 'helpers\prefix-input.ps1'
+. $helperPath
+
+$tempDir = New-PrefixTempDir
+$moduleName = 'prefiximportpath' + ([IO.Path]::GetRandomFileName().Replace('.', ''))
+
+try {
+  $markerPath = Join-Path $tempDir 'marker.txt'
+  $programPath = Join-Path $tempDir 'program.pre'
+  $modulePath = Join-Path $tempDir "$moduleName.pre"
+  $extensionlessPath = Join-Path $tempDir $moduleName
+
+  $markerLiteral = $markerPath.Replace('\', '/')
+  $moduleLiteral = $modulePath.Replace('\', '\\')
+  $extensionlessLiteral = $extensionlessPath.Replace('\', '\\')
+
+  Set-Content -Path $modulePath -Encoding Ascii -Value @"
+STR: marker = "$markerLiteral"
+
+IF(EXISTFILE(marker)){
+    WRITEFILE("reloaded", marker)
+} ELSE {
+    WRITEFILE("loaded", marker)
+}
+
+FUNC STR: marker_text(){
+    RETURN(READFILE(marker))
+}
+"@
+
+  Set-Content -Path $programPath -Encoding Ascii -Value @"
+IMPORT_PATH("$extensionlessLiteral")
+IMPORT_PATH("$moduleLiteral", again)
+
+ASSERT(EQ($moduleName.marker_text(), "loaded"))
+ASSERT(EQ(again.marker_text(), "loaded"))
+"@
+
+  $result = Invoke-PrefixProgramWithInput -ProgramPath $programPath -InputText ''
+  Assert-PrefixSuccess $result
+  Assert-NoErrorOutput $result
+}
+finally {
+  Remove-Item -Path $tempDir -Recurse -Force -ErrorAction SilentlyContinue
+}
diff --git a/tests/cases/passing/import_path-isolated-top-level.pre b/tests/cases/passing/import_path-isolated-top-level.pre
@@ -0,0 +1,10 @@
+IMPORT(path)
+
+STR: tests_dir = path.BASEPATH(path.BASEPATH(path.script_dir))
+STR: helper_path = JOIN(tests_dir, "/helpers/import_path_isolated_target.pre")
+
+INT: shared = 0d11
+
+ASSERT(NOT(IMPORT_PATH(helper_path, helper)))
+ASSERT(EQ(helper.read_shared(), 0d7))
+ASSERT(EQ(shared, 0d11))
diff --git a/tests/cases/passing/import_path-no-companion-prex.pre b/tests/cases/passing/import_path-no-companion-prex.pre
@@ -0,0 +1,7 @@
+IMPORT(path)
+
+STR: tests_dir = path.BASEPATH(path.BASEPATH(path.script_dir))
+STR: helper_path = JOIN(tests_dir, "/helpers/import_path_prex_target.pre")
+
+ASSERT(NOT(IMPORT_PATH(helper_path)))
+ASSERT(EQ(import_path_prex_target.identify(), "source"))
diff --git a/tests/cases/passing/import_path-package-init.ps1 b/tests/cases/passing/import_path-package-init.ps1
@@ -0,0 +1,34 @@
+$helperPath = Join-Path (Split-Path -Parent (Split-Path -Parent $PSScriptRoot)) 'helpers\prefix-input.ps1'
+. $helperPath
+
+$tempDir = New-PrefixTempDir
+$packageName = 'prefixpkg' + ([IO.Path]::GetRandomFileName().Replace('.', ''))
+
+try {
+  $programPath = Join-Path $tempDir 'program.pre'
+  $packageDir = Join-Path $tempDir $packageName
+  $initPath = Join-Path $packageDir 'init.pre'
+
+  New-Item -ItemType Directory -Path $packageDir | Out-Null
+
+  Set-Content -Path $initPath -Encoding Ascii -Value @'
+FUNC STR: identify(){
+    RETURN("package")
+}
+'@
+
+  $packageLiteral = $packageDir.Replace('\', '\\')
+
+  Set-Content -Path $programPath -Encoding Ascii -Value @"
+IMPORT_PATH("$packageLiteral")
+
+ASSERT(EQ($packageName.identify(), "package"))
+"@
+
+  $result = Invoke-PrefixProgramWithInput -ProgramPath $programPath -InputText ''
+  Assert-PrefixSuccess $result
+  Assert-NoErrorOutput $result
+}
+finally {
+  Remove-Item -Path $tempDir -Recurse -Force -ErrorAction SilentlyContinue
+}
diff --git a/tests/cases/passing/import_path-package-missing-init-errors.ps1 b/tests/cases/passing/import_path-package-missing-init-errors.ps1
@@ -0,0 +1,34 @@
+$helperPath = Join-Path (Split-Path -Parent (Split-Path -Parent $PSScriptRoot)) 'helpers\prefix-input.ps1'
+. $helperPath
+
+$tempDir = New-PrefixTempDir
+$packageName = 'prefixpkg' + ([IO.Path]::GetRandomFileName().Replace('.', ''))
+
+try {
+  $programPath = Join-Path $tempDir 'program.pre'
+  $modulePath = Join-Path $tempDir "$packageName.pre"
+  $packageDir = Join-Path $tempDir $packageName
+
+  New-Item -ItemType Directory -Path $packageDir | Out-Null
+
+  Set-Content -Path $modulePath -Encoding Ascii -Value @'
+FUNC STR: identify(){
+    RETURN("module")
+}
+'@
+
+  $packageLiteral = $packageDir.Replace('\', '\\')
+
+  Set-Content -Path $programPath -Encoding Ascii -Value @"
+IMPORT_PATH("$packageLiteral")
+"@
+
+  $result = Invoke-PrefixProgramWithInput -ProgramPath $programPath -InputText ''
+  if ($result.ExitCode -eq 0) {
+    $outputText = "STDOUT: $(Format-VisibleText $result.Stdout)`nSTDERR: $(Format-VisibleText $result.Stderr)"
+    throw "Expected IMPORT_PATH($packageLiteral) to fail when the package directory has no init.pre`n$outputText"
+  }
+}
+finally {
+  Remove-Item -Path $tempDir -Recurse -Force -ErrorAction SilentlyContinue
+}
diff --git a/tests/cases/passing/import_path-return-false.pre b/tests/cases/passing/import_path-return-false.pre
@@ -0,0 +1,7 @@
+IMPORT(path)
+
+STR: tests_dir = path.BASEPATH(path.BASEPATH(path.script_dir))
+STR: helper_path = JOIN(tests_dir, "/helpers/import_path_basic_target.pre")
+
+ASSERT(EQ(TYPE(IMPORT_PATH(helper_path)), "BOOL"))
+ASSERT(NOT(IMPORT_PATH(helper_path)))
diff --git a/tests/helpers/import_path_basic_target.pre b/tests/helpers/import_path_basic_target.pre
@@ -0,0 +1,3 @@
+FUNC STR: identify(){
+    RETURN("basic")
+}
diff --git a/tests/helpers/import_path_cache_target.pre b/tests/helpers/import_path_cache_target.pre
@@ -0,0 +1,13 @@
+IMPORT(path)
+
+STR: marker = path.TEMPFILE("prefix-import-path-cache-target.txt")
+
+IF(EXISTFILE(marker)){
+    WRITEFILE("reloaded", marker)
+} ELSE {
+    WRITEFILE("loaded", marker)
+}
+
+FUNC STR: marker_text(){
+    RETURN(READFILE(marker))
+}
diff --git a/tests/helpers/import_path_hidden_target.pre b/tests/helpers/import_path_hidden_target.pre
@@ -0,0 +1 @@
+INT: hidden = 0d7
diff --git a/tests/helpers/import_path_isolated_target.pre b/tests/helpers/import_path_isolated_target.pre
@@ -0,0 +1,5 @@
+INT: shared = 0d7
+
+FUNC INT: read_shared(){
+    RETURN(shared)
+}
diff --git a/tests/helpers/import_path_prex_target.pre b/tests/helpers/import_path_prex_target.pre
@@ -0,0 +1,3 @@
+FUNC STR: identify(){
+    RETURN("source")
+}
diff --git a/tests/helpers/import_path_prex_target.prex b/tests/helpers/import_path_prex_target.prex
@@ -0,0 +1 @@
+ignored companion pointer file

Original file line number	Diff line number	Diff line change
`@@ -0,0 +1 @@`
	`1`	`+IMPORT_PATH("g:/missing.pre", helper, extra)`