# HG changeset patch
# User Markus Mützel <markus.muetzel@gmx.de>
# Date 1635787340 -3600
# Node ID 313da8fd4657c9ade3b2efb8937266b2ec2d45cb
# Parent  007dd7d008b384139f6bb42c1d6a38936a08166f
test: Use directory in "is_same_file" test that exists in all mingw environments.

* libinterp/corefcn/utils.cc (is_same_file): Use directory in test that exists
  in all Windows environments.

diff -r 007dd7d008b3 -r 313da8fd4657 libinterp/corefcn/utils.cc
--- a/libinterp/corefcn/utils.cc	Mon Nov 01 17:38:03 2021 +0100
+++ b/libinterp/corefcn/utils.cc	Mon Nov 01 18:22:20 2021 +0100
@@ -390,8 +390,7 @@
 %!testif ; ! ispc ()
 %! assert (is_same_file ("~", tilde_expand ("~")));
 %!testif ; ispc ()
-%! assert (is_same_file (tolower (getenv ("OCTAVE_HOME")),
-%!                       toupper (getenv ("OCTAVE_HOME"))), true);
+%! assert (is_same_file (tolower (tempdir ()), toupper (tempdir ())), true);
 %!assert (is_same_file ({pwd(), ".", tempdir()}, canonicalize_file_name (".")),
 %!        [true, true, false])