home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #18 / NN_1992_18.iso / spool / comp / sys / apollo / 3288 < prev    next >
Encoding:
Text File  |  1992-08-16  |  1.8 KB  |  45 lines

  1. Newsgroups: comp.sys.apollo
  2. Path: sparky!uunet!mcsun!sun4nl!relay.philips.nl!greece!gregp
  3. From: gregp@greece.seri.philips.nl (Greg Pritchett)
  4. Subject: Re: Node ID from C
  5. Message-ID: <1992Aug17.074020.842@phcomgw.seri.philips.nl>
  6. Originator: news@phcoms.seri.philips.nl
  7. Sender: news@phcomgw.seri.philips.nl
  8. Reply-To: gregp@scs.philips.nl
  9. Organization: SERI-CEN Network Services, Philips C&P, Eindhoven, The Netherlands
  10. X-Newsreader: Tin 1.1 PL4
  11. References: <14_Aug_92_09:31:13_BST_#9071@UK.AC.BHAM.IBM3090>
  12. Date: Mon, 17 Aug 1992 07:40:20 GMT
  13. Lines: 30
  14.  
  15. I have used the following in the past. Unfortunately, it's not
  16. documented ( or supported ! ) . It used to work on a flat 10.0
  17. and I've just tested it on a 10.3.5 machine , so I guess it will
  18. work on your 10.3. Hope this helps . . . 
  19.  
  20. extern std_$call void msg_$get_my_node();
  21.  
  22. main ()
  23.  
  24. {
  25. long node_id;
  26.  
  27. msg_$get_my_node ( node_id );
  28.  
  29. printf ("Node id %X\n", node_id );
  30.  
  31. }
  32.  
  33. ==============================================================================
  34. |                                                                            |
  35. |  Greg Pritchett                     _/_/_/_/ _/_/_/_/ _/_/_/_/  _/_/_/_/   |
  36. |  Central Systems Support Group     _/       _/       _/        _/          |
  37. |  Philips Semiconductors Ltd       _/       _/_/_/_/ _/_/_/_/  _/  _/_/     |
  38. |  Southampton                     _/             _/       _/  _/    _/      |
  39. |  United Kingdom                 _/_/_/_/ _/_/_/_/ _/_/_/_/  _/_/_/_/       |
  40. |  email : Being changed at the moment                                       |
  41. |  tel   : +44 703 316385                                                    |
  42. |  fax   : +44 703 316305                                                    |
  43. |                                                                            |
  44. ==============================================================================
  45.