Plain English

\ copyright © 2006 the osmosian order (3040)

\ firstparam=esp+4/ebp+8, secondparam=esp+8/ebp+12, etc...

an abort message is a string.

to abort with a string:
  if the compiler's abort flag is set, exit.
  set the compiler's abort flag.
  put the string into the compiler's abort message.

to abort with a string and a byte pointer:
  if the compiler's abort flag is set, exit.
  set the compiler's abort flag.
  put the string into the compiler's abort message.
  find the compiler's abort path and the compiler's abort row# given the byte pointer.
  if the compiler's abort path is blank, exit.
  extract a file name from the compiler's abort path.
  prepend "Error in " then the file name then ". " to the compiler's abort message.

to abort with a string and a rider:
  if the rider's token is not blank, abort with the string and the rider's token's first; exit.
  abort with the string and the rider's source's last.

to add the allocate and deallocate and finalize and destroy routines:
  if the compiler's abort flag is set, exit.
  get a type from the types.
  if the type is nil, exit.