UseResFile

This commit is contained in:
Kelvin Sherlock 2013-03-03 21:55:33 -05:00
parent 184ecf2922
commit fea833311a
3 changed files with 16 additions and 0 deletions

View File

@ -294,6 +294,17 @@ namespace RM
return SetResError(::ResError());
}
uint16_t UseResFile(uint16_t trap)
{
uint16_t resFile;
StackFrame<2>(resFile);
Log("%04x UseResFile(%04x)\n", trap, resFile);
::UseResFile(resFile);
return SetResError(::ResError());
}
// todo -- move since it's not RM related.

View File

@ -22,6 +22,7 @@ namespace RM
uint16_t SetResLoad(uint16_t trap);
uint16_t CurResFile(uint16_t trap);
uint16_t UseResFile(uint16_t trap);
}

View File

@ -205,6 +205,10 @@ namespace ToolBox {
d0 = RM::OpenResFile(trap);
break;
case 0xA998:
d0 = RM::UseResFile(trap);
break;
case 0xa99a:
d0 = RM::CloseResFile(trap);
break;