//
// Return GEMDOS format date
//
-VALUE dos_date(void)
+uint32_t dos_date(void)
{
- VALUE v;
+ uint32_t v;
struct tm * tm;
time_t tloc;
//
// Return GEMDOS format time
//
-VALUE dos_time(void)
+uint32_t dos_time(void)
{
- VALUE v;
+ uint32_t v;
struct tm * tm;
time_t tloc;
//
// Generate a time string
//
-void time_string(char * buf, VALUE time)
+void time_string(char * buf, uint32_t time)
{
int hour;
char * ampm;
//
// Generate a date string
//
-void date_string(char * buf, VALUE date)
+void date_string(char * buf, uint32_t date)
{
sprintf(buf, "%d-%s-%d",
(int)(date & 0x1F), month[(date >> 5) & 0xF], (int)((date >> 9) + 1980));
//
// Output a value to listing
//
-int listvalue(VALUE v)
+int listvalue(uint32_t v)
{
sprintf(buf, "=%08X", v);
strncpy(lnimage + DATA_COL - 1, buf, 9);
int ejectok;
ejectok = 1;
- if (*tok == '-')
+ if (*tok.u32 == '-')
{
ejectok = 0;
- ++tok;
+ ++tok.u32;
}
- if (*tok != STRING)
+ if (*tok.u32 != STRING)
return error("missing string");
-// strcpy(subttl, (char *)tok[1]);
- strcpy(subttl, string[tok[1]]);
+// strcpy(subttl, (char *)tok.u32[1]);
+ strcpy(subttl, string[tok.u32[1]]);
- tok += 2;
+ tok.u32 += 2;
// Always eject on pages 2+
if (ejectok && (subflag || pageno > 1))
//
int d_title(void)
{
- if (*tok != STRING)
+ if (*tok.u32 != STRING)
return error("missing string");
-// strcpy(title, (char*)tok[1]);
- strcpy(title, string[tok[1]]);
- tok += 2;
+// strcpy(title, (char*)tok.u32[1]);
+ strcpy(title, string[tok.u32[1]]);
+ tok.u32 += 2;
if (pageno > 1)
{