Hi,

I'm trying to run a test program on MPE so I thought I'd start with Hello
World and see where I got.  This is what I have so far -

$CONTROL USLINIT, MAIN=HELLO
BEGIN
  INTRINSIC PRINT;
$CONTROL SEGMENT=HELLO
PROCEDURE HELLO;
BEGIN
   BYTE ARRAY OUT(0:12);
   MOVE OUT:="Press return to continue...";
   PRINT(OUT, -12, 0);
END
END

But I get -

ERROR #60 NO OUTER BLOCK IS ACTIVE

I added a $CONTROL SEGMENT=HELLO in an attempt to fix that.  I'm trying to
base my program on one in the HP SPL reference manual.

I also get a warning during compilation -
00031 2      PRINT(OUT, -12, 0);
                                ^
***** WARNING #001 *****  ARITHMETIC RIGHT SHIFT EMITTED

I presume that's something to do with using a BYTE ARRAY instead of an
INTEGER array - I notice programs do that but I don't understand why.

Any help appreciated.

Peter

P.S. and slightly OT - the results of my search for "SPL Hello World" first
hit -

http://shakespearelang.sourceforge.net/report/shakespeare/shakespeare.html

The Shakespeare Programming Language
...
Design Goals
The design goal was to make a language with beautiful source code that
resembled Shakespeare plays.

Not quite what I wanted!
--
http://www.beluga.freeserve.co.uk

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *