SAVE filename

Saves the definitions of all unburied procedures, variables, and property lists in a file named filename.

SAVE is equivalent to:

TO SAVE :filename
  LOCAL "oldwriter
  MAKE "oldwriter WRITER
  OPENWRITE :filename
  SETWRITE :filename
  POALL
  SETWRITE :oldwriter
  CLOSE :filename
END

TO MYPROGRAM1
  PRINT "Hello1
END

TO MYPROGRAM2
  PRINT "Hello2
END

POTS
TO MYPROGRAM1
TO MYPROGRAM2

SAVE "myprograms.lgo
ERALL
POTS
LOAD "myprograms.lgo
POTS
TO MYPROGRAM1
TO MYPROGRAM2