[comp.sys.mac.programmer] Getting A0 from LSPascal

borcelf@jacobs.cs.orst.edu (Fernando Borcel) (01/24/89)

I need to get the value of A0 from LSP.  I was told I could use an inline pro-
cedure, but I'm totally unfamiliar with them.  So, could anybody tell me how
to put the value of A0 in a variable of type ptr?

Thanks a lot!

		-Fernando Borcel
"Tact is the ability to tell a man he has an open mind when he has a
hole in his head."  Internet:     borcelf@jacobs.cs.ORST.EDU
                    UUCP:{tektronix,hp-pcd}!orstcs!jacobs.cs.orst.edu!borcelf

bob@accuvax.nwu.edu (Bob Hablutzel) (01/24/89)

> I need to get the value of A0 from LSP.  I was told I could use an inline pro-
> cedure, but I'm totally unfamiliar with them.  So, could anybody tell me how
> to put the value of A0 in a variable of type ptr?

Try the following:

Function GetA0: Ptr; Inline $2F48, $0004, $4E75;

This translates into:

	move.l	A0,4(SP)
	rts

> Thanks a lot!

Gladly.

> 		-Fernando Borcel
> "Tact is the ability to tell a man he has an open mind when he has a
> hole in his head."  Internet:     borcelf@jacobs.cs.ORST.EDU
>                    UUCP:{tektronix,hp-pcd}!orstcs!jacobs.cs.orst.edu!borcelf

Bob Hablutzel	Wildwood Software	BOB@NUACC.ACNS.NWU.EDU