Add support for page references through new `ref.form` property (#4729)

4 files changed, 33 insertions, 0 deletions

diff --git a/tests/ref/ref-form-page-unambiguous.png b/tests/ref/ref-form-page-unambiguous.png
new file mode 100644
index 00000000..e7baa2f2
--- /dev/null
+++ b/tests/ref/ref-form-page-unambiguous.png
diff --git a/tests/ref/ref-form-page.png b/tests/ref/ref-form-page.png
new file mode 100644
index 00000000..52fde86d
--- /dev/null
+++ b/tests/ref/ref-form-page.png
diff --git a/tests/suite/layout/page.typ b/tests/suite/layout/page.typ
index b9f41269..a35f19bb 100644
--- a/tests/suite/layout/page.typ
+++ b/tests/suite/layout/page.typ
@@ -230,6 +230,13 @@ Z
 #counter(page).update(53)
 #filler
 
+--- page-numbering-hint ---
+= Heading <intro>
+
+// Error: 1:21-1:47 cannot reference without page numbering
+// Hint: 1:21-1:47 you can enable page numbering with `#set page(numbering: "1")`
+Can not be used as #ref(<intro>, form: "page")
+
 --- page-suppress-headers-and-footers ---
 #set page(header: none, footer: none, numbering: "1")
 Look, ma, no page numbers!
diff --git a/tests/suite/model/ref.typ b/tests/suite/model/ref.typ
index cc6d6bf1..2f8e2fa2 100644
--- a/tests/suite/model/ref.typ
+++ b/tests/suite/model/ref.typ
@@ -55,6 +55,32 @@ $ A = 1 $ <eq2>
 @arrgh
 #bibliography("/assets/bib/works.bib")
 
+--- ref-form-page ---
+#set page(numbering: "1")
+
+Text <text> is on #ref(<text>, form: "page").
+See #ref(<setup>, form: "page").
+
+#set page(supplement: [p.])
+
+== Setup <setup>
+Text seen on #ref(<text>, form: "page").
+Text seen on #ref(<text>, form: "page", supplement: "Page").
+
+--- ref-form-page-unambiguous ---
+// Test that page reference is not ambiguous.
+#set page(numbering: "1")
+
+= Introduction <arrgh>
+
+#ref(<arrgh>, form: "page")
+#bibliography("/assets/bib/works.bib")
+
+--- ref-form-page-bibliography ---
+// Error: 2-28 label `<quark>` does not exist in the document
+#ref(<quark>, form: "page")
+#bibliography("/assets/bib/works.bib")
+
 --- issue-4536-non-whitespace-before-ref ---
 // Test reference with non-whitespace before it.
 #figure[] <1>