Changeset View
Changeset View
Standalone View
Standalone View
head/devel/flang/files/patch-runtime_flang_stime3f.c
--- runtime/flang/stime3f.c.orig 2017-05-17 00:40:01 UTC | --- runtime/flang/stime3f.c.orig 2017-10-19 11:03:03 UTC | ||||
+++ runtime/flang/stime3f.c | +++ runtime/flang/stime3f.c | ||||
@@ -27,13 +27,7 @@ | @@ -27,13 +27,7 @@ | ||||
int ENT3F(STIME, stime)(int *tp) | int ENT3F(STIME, stime)(int *tp) | ||||
{ | { | ||||
- int i; | - int i; | ||||
- time_t t = *tp; | - time_t t = *tp; | ||||
- | - | ||||
- if ((i = stime(&t))) | - if ((i = stime(&t))) | ||||
- i = __io_errno(); | - i = __io_errno(); | ||||
- | - | ||||
- return i; | - return i; | ||||
+ return EPERM; | + return EPERM; | ||||
} | } | ||||
#endif /* !WINNT */ | #endif /* !WINNT */ |