RM::Native::SetResLoad

This commit is contained in:
Kelvin Sherlock 2013-08-17 18:59:03 -04:00
parent e83f2d6d35
commit a0ea7c365a
2 changed files with 13 additions and 0 deletions

View File

@ -182,6 +182,7 @@ namespace RM
// used by GetString (utility.h)
// used by Loader.
uint16_t GetResource(uint32_t type, uint16_t id, uint32_t &theHandle)
{
return LoadResource(type, theHandle,
@ -190,6 +191,17 @@ namespace RM
});
}
uint16_t SetResLoad(bool load)
{
ResLoad = load;
::SetResLoad(load);
memoryWriteByte(load ? 0xff : 0x00, MacOS::ResLoad); // word or byte?
return SetResError(0);
}
}
uint16_t CloseResFile(uint16_t trap)

View File

@ -8,6 +8,7 @@ namespace RM
namespace Native
{
uint16_t SetResLoad(bool tf);
uint16_t GetResource(uint32_t type, uint16_t id, uint32_t &theHandle);
}