1 files changed, 31 insertions, 0 deletions
diff --git a/src/test/ui/unboxed-closures/unboxed-closures-extern-fn-hr.rs b/src/test/ui/unboxed-closures/unboxed-closures-extern-fn-hr.rs
new file mode 100644
index 000000000..3ee1aeb10
--- /dev/null
+++ b/src/test/ui/unboxed-closures/unboxed-closures-extern-fn-hr.rs
@@ -0,0 +1,31 @@
+// run-pass
+// Checks that higher-ranked extern fn pointers implement the full range of Fn traits.
+
+fn square(x: &isize) -> isize { (*x) * (*x) }
+
+fn call_it<F:Fn(&isize)->isize>(f: &F, x: isize) -> isize {
+    (*f)(&x)
+}
+
+fn call_it_boxed(f: &dyn Fn(&isize) -> isize, x: isize) -> isize {
+    f(&x)
+}
+
+fn call_it_mut<F:FnMut(&isize)->isize>(f: &mut F, x: isize) -> isize {
+    (*f)(&x)
+}
+
+fn call_it_once<F:FnOnce(&isize)->isize>(f: F, x: isize) -> isize {
+    f(&x)
+}
+
+fn main() {
+    let x = call_it(&square, 22);
+    let x1 = call_it_boxed(&square, 22);
+    let y = call_it_mut(&mut square, 22);
+    let z = call_it_once(square, 22);
+    assert_eq!(x, square(&22));
+    assert_eq!(x1, square(&22));
+    assert_eq!(y, square(&22));
+    assert_eq!(z, square(&22));
+}