[Coco] Basic09 Whats Wrong.

[coco at jechar.ca]

  Two simple programs but neither correct

  program a.b089 results in an error 27 when loading is attempted.
  program t.b089 results in an error 69 when loading is attempted.

   Code for a.b089 follows:
PROCEDURE a
PARAMETER a,b:INTEGER
PRINT a+b
END
   Code for t.b089 follows:
PROCEDURE t

PARAM x,y:STRING

IF y="" THEN
    PRINT"Two parameters required."
ENDIF

IF y<>"" THEN
    PRINT "X=",x
ENDIF

IF y<>"" THEN
    PRINT "Y=",y
ENDIF

END

Why ?
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: a.b09
URL: <https://pairlist5.pair.net/pipermail/coco/attachments/20181019/455c6ce2/attachment.ksh>
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: t.b09
URL: <https://pairlist5.pair.net/pipermail/coco/attachments/20181019/455c6ce2/attachment-0001.ksh>