• Subject: Pointer not set on returning from an RPG procedure to a CL one.
  • From: "McCallion, Martin" <MccalliM@xxxxxxxxxxxxxxxx>
  • Date: Thu, 6 Jan 2000 17:36:52 -0000

Hi all.

This is weird.

I was typing up this message, and before I completed it, I tried
something out which fixed the problem.  But I thought I'd share it with
the list anyway, as I don't understand it.

Here's my original question:

I have a simple RPG procedure which returns a one-character value (*on
or *off, but that doesn't seem to be relevant, as I get the same problem
if I code a literal '1' or '0').  I'm calling it from a CL procedure,
using CALLPRC with the RTNVAL parameter.  The field for RTNVAL is
defined as *CHAR 1.

I get MCH3601, pointer not set for location referenced, on the RETURN
opcode.  Neither debug nor a dump tells me anything.

We are on V4R3.  Anybody got any ideas?

*** End of original question ***

And then I prompted CALLPRC and hit help on RTNVAL; it mentioned the
return value being 'aligned on a sixteen-byte boundary'.  So on an
impulse I redefined my return value field as *char 16.  And it worked.

I've come across this 'aligned on a sixteen-byte boundary' expression
before, and never understood it; I eventually had concluded that it was
a fancy way of saying pointers are sixteen bytes long; but I see that
there's more to it than that.  Can anybody explain what's going on here?

Cheers,

Martin.

--                                                                     
Martin McCallion                 
Midas-Kapiti International
Work:  mccallim@midas-kapiti.com
Home: martin.mccallion@ukonline.co.uk

Apologies for the length of this sig, but company policy says:
This email message is intended for the named recipient only.  It may be
privileged and/or confidential.  If you are not the intended named
recipient of this email then you should not copy it or use it for any
purpose, nor disclose its contents to any other person.  You should
contact Midas-Kapiti International as shown below so that we can take
appropriate action at no cost to yourself.

Midas-Kapiti International Ltd, 1 St George's Road, Wimbledon, London,
SW19 4DR, UK
Email: Postmaster@midas-kapiti.com Tel: +44 (0)208 879 1188 Fax: +44
(0)208 947 3373
Midas-Kapiti International Ltd is registered in England and Wales under
company no. 971479

.:. 
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].