Xref: utzoo comp.sys.mac.programmer:850 comp.sys.mac:16109
Path: utzoo!attcan!uunet!husc6!bbn!rochester!cornell!uw-beaver!ssc-vax!housen
From: housen@ssc-vax.UUCP (Kevin Housen)
Newsgroups: comp.sys.mac.programmer,comp.sys.mac
Subject: writing an INIT in LSP
Keywords: stupidity, help
Message-ID: <1930@ssc-vax.UUCP>
Date: 16 May 88 17:43:25 GMT
Organization: Boeing Aerospace Corp., Seattle WA
Lines: 32


I am having a problem writing an INIT in Lightspeed Pascal
(version 1.11) on a Mac II.  After continual system bombs,
I tried making a really simple INIT - as follows:

unit MyInit;
interface
  procedure Main;
implementation
  procedure Main;
  begin
    SysBeep (1);
  end;
end.

When I reboot, the INIT runs, beeps, then dies with a system
error (ID=1).  Again, this is on a Mac II.  It works fine on a Mac
Plus.  The Think/Symantec support people seemed to recall a
problem with SysBeeps in INITs on Mac IIs.  However, the actual
INIT that I am working on (which doesnt make any SysBeep calls)
behaves the same way - bombs on a Mac II but works fine on
a Plus.  I am new to Pascal so I am probably doing something
fundamentally stupid.  Can anyone help?

By the way, my project file contains:
DA Paslib
MacTraps
InitCode (the unit shown above)

Thanks heaps -

Kevin Housen