Remove redundant include paths with msvc.

Author: bakpakin

spork/cc.janet

@@ -436,14 +436,14 @@
   "Compile a C source file with MSVC to an object file. Return the command arguments."
   [from to]
   (exec [(cl.exe) "/c" (msvc-cstd) "/utf-8" "/nologo" ;(cflags) ;(msvc-compile-paths) ;(msvc-opt) ;(msvc-defines)
-         "/I" (dyn *syspath* ".") from (string "/Fo" to)]
+         from (string "/Fo" to)]
         [from] [to] (string "compiling " from "...")))
 
 (defn msvc-compile-c++
   "Compile a C++ source file with MSVC to an object file. Return the command arguments."
   [from to]
   (exec [(cl.exe) "/c" (msvc-c++std) "/utf-8" "/nologo" "/EHsc" ;(c++flags) ;(msvc-compile-paths) ;(msvc-opt) ;(msvc-defines)
-         "/I" (dyn *syspath* ".") from (string "/Fo" to)]
+         from (string "/Fo" to)]
         [from] [to] (string "compiling " from "...")))
 
 (defn msvc-link-shared