(Solved) PRINT: Unexpected HMS formatting/Unexpected DMS formatting

[Tim Wessman]

It is actually a flag embedded in the number object itself.

Whichever format was entered, use the ->HMS or HMS-> to set that flag. There is not any calculation that happens - it is purely setting the flag.

Here's the code for those commands if you are curious:

Code:

static THPObj *CallHMS2(THPVarFuncDef const *f, THPObj const **Params, Int NbParams)
{
  HP_Real r; if (!Params[0]->GetReal(&r)) return &HPERBadArguementType;
  r.Flags&= ~FDMSDisplay;
  return THPObj::NewReal(&r);
}
static THPObj *Call2HMS(THPVarFuncDef const *f, THPObj const **Params, Int NbParams)
{
  HP_Real r; if (!Params[0]->GetReal(&r)) return &HPERBadArguementType;
  r.Flags|= FDMSDisplay;
  return THPObj::NewReal(&r);
}