Stub SCI32's kOnMe to give better debugging info (used when clicking in the GK1 menu).
svn-id: r46533
This commit is contained in:
parent
d7cd8345c0
commit
996da19fc9
3 changed files with 12 additions and 0 deletions
|
@ -351,6 +351,7 @@ SciKernelFunction kfunct_mappers[] = {
|
||||||
DEFUN("RepaintPlane", kRepaintPlane, "o"),
|
DEFUN("RepaintPlane", kRepaintPlane, "o"),
|
||||||
DEFUN("FrameOut", kFrameOut, ""),
|
DEFUN("FrameOut", kFrameOut, ""),
|
||||||
DEFUN("ListEachElementDo", kListEachElementDo, ".*"),
|
DEFUN("ListEachElementDo", kListEachElementDo, ".*"),
|
||||||
|
DEFUN("OnMe", kOnMe, "iio.*"),
|
||||||
|
|
||||||
// SCI2.1 Kernel Functions
|
// SCI2.1 Kernel Functions
|
||||||
DEFUN("Save", kSave, ".*"),
|
DEFUN("Save", kSave, ".*"),
|
||||||
|
|
|
@ -406,6 +406,7 @@ reg_t kUpdatePlane(EngineState *s, int argc, reg_t *argv);
|
||||||
reg_t kRepaintPlane(EngineState *s, int argc, reg_t *argv);
|
reg_t kRepaintPlane(EngineState *s, int argc, reg_t *argv);
|
||||||
reg_t kFrameOut(EngineState *s, int argc, reg_t *argv);
|
reg_t kFrameOut(EngineState *s, int argc, reg_t *argv);
|
||||||
reg_t kListEachElementDo(EngineState *s, int argc, reg_t *argv);
|
reg_t kListEachElementDo(EngineState *s, int argc, reg_t *argv);
|
||||||
|
reg_t kOnMe(EngineState *s, int argc, reg_t *argv);
|
||||||
|
|
||||||
// SCI2.1 Kernel Functions
|
// SCI2.1 Kernel Functions
|
||||||
reg_t kSave(EngineState *s, int argc, reg_t *argv);
|
reg_t kSave(EngineState *s, int argc, reg_t *argv);
|
||||||
|
|
|
@ -711,6 +711,16 @@ reg_t kListEachElementDo(EngineState *s, int argc, reg_t *argv) {
|
||||||
return NULL_REG;
|
return NULL_REG;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
reg_t kOnMe(EngineState *s, int argc, reg_t *argv) {
|
||||||
|
// This kernel function looks like it calls a function in the object (arg 2) with
|
||||||
|
// the x/y coordinates supplied in args 0/1. Arg 3 seems to be 0.
|
||||||
|
|
||||||
|
// TODO
|
||||||
|
|
||||||
|
warning("kOnMe: (%d, %d) on object %04x:%04x", argv[0].toUint16(), argv[1].toUint16(), PRINT_REG(argv[2]));
|
||||||
|
return NULL_REG;
|
||||||
|
}
|
||||||
|
|
||||||
} // End of namespace Sci
|
} // End of namespace Sci
|
||||||
|
|
||||||
#endif // ENABLE_SCI32
|
#endif // ENABLE_SCI32
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue