Merge pull request #69 from Thomas008/main

adaptions to Windows: readline(),  added sleep_win()

Author: brenhinkeller

src/llvmio.jl

@@ -741,11 +741,12 @@ end
             linelen += 1
             c = getc(fp)
         end
-        fseek(fp, (c < 0) - linelen - 1)
+        offset_fseek = Sys.iswindows() ? 2 : 1
+        fseek(fp, (c < 0) - linelen - offset_fseek)
         str = MallocString(undef, linelen + 1) # str[end] == 0x00
         if linelen > 0
             gets!(str, fp, linelen)
-            fseek(fp, 1) # Advance by 1
+            fseek(fp, offset_fseek) # Advance by the offset
         end
         return str
     end

src/llvmlibc.jl

@@ -321,6 +321,24 @@ julia> usleep(1000000)
 end
 
 
+"""
+```julia
+sleep_win(sec::Real)
+```
+sleep function for Windows using Sleep()
+
+## Examples
+```julia
+julia> sleep_win(2.5)
+0
+```
+"""
+function sleep_win(secs::Real)
+    millisecs = round(Int, secs * 1000)
+    @symbolcall Sleep(millisecs :: Int) :: Int
+end
+
+
 """
 ```julia
 system(s)