vishapoberon/compiler
1
0
Fork 0
mirror of https://github.com/vishapoberon/compiler.git synced 2026-04-06 18:02:25 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

chaned TimeDesc in File0.Mod and File.Mod -- antranigv

Browse source 
Former-commit-id: 3cdb5b1d3a
This commit is contained in:
Antranig Vartanian 2015-12-12 21:58:47 +04:00
parent 1a2082bfc2
commit 10e2d4c807
2 changed files with 38 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

21
src/lib/system/openbsd/gcc/x86_64/Files.Mod
View file

@ -53,10 +53,27 @@ MODULE Files; (* J. Templ 1.12. 89/12.4.95 Oberon files mapped onto Unix files
org, offset: LONGINT
END ;
(* from time.h on OpenBSD; added yday; changed gmtoff, zone order;
sec to isdst changed to INTEGER; -- antranigv
struct tm {
int tm_sec;
int tm_min;
int tm_hour;
int tm_mday;
int tm_mon;
int tm_year;
int tm_wday;
int tm_yday;
int tm_isdst;
long tm_gmtoff;
char *tm_zone;
}; *)
Time = POINTER TO TimeDesc;
TimeDesc = RECORD
sec*, min*, hour*, mday*, mon*, year*, wday*, isdst*, zone*, gmtoff*: LONGINT;
(* sec*, min*, hour*, mday*, mon*, year*, wday*, isdst*, zone*, gmtoff*: INTEGER;*)
sec, min, hour, mday, mon, year, wday, yday, isdst : INTEGER;
gmtoff, zone : LONGINT
(* sec, min, hour, mday, mon, year, wday, isdst, zone, gmtoff: INTEGER*)
END ;
VAR

21
src/lib/system/openbsd/gcc/x86_64/Files0.Mod
View file

@ -56,10 +56,27 @@ MODULE Files0; (* J. Templ 1.12. 89/12.4.95 Oberon files mapped onto Unix files
org, offset: LONGINT
END ;
(* from time.h on OpenBSD; added yday; changed gmtoff, zone order;
sec to isdst changed to INTEGER; -- antranigv
struct tm {
int tm_sec;
int tm_min;
int tm_hour;
int tm_mday;
int tm_mon;
int tm_year;
int tm_wday;
int tm_yday;
int tm_isdst;
long tm_gmtoff;
char *tm_zone;
}; *)
Time = POINTER TO TimeDesc;
TimeDesc = RECORD
sec*, min*, hour*, mday*, mon*, year*, wday*, isdst*, zone*, gmtoff*: LONGINT;
(* sec*, min*, hour*, mday*, mon*, year*, wday*, isdst*, zone*, gmtoff*: INTEGER;*)
sec, min, hour, mday, mon, year, wday, yday, isdst : INTEGER;
gmtoff, zone : LONGINT
(* sec, min, hour, mday, mon, year, wday, isdst, zone, gmtoff: INTEGER*)
END ;
VAR