/////////////////////////////////////////////////////////////////////
// LOAD WINDOW
/////////////////////////////////////////////////////////////////////

#xcommand LOAD WINDOW <w> ;
   => ;
      _OOHG_TempWindowName := <(w)> ;;
      DECLARE WINDOW <w> ;;
      #include \<<w>.fmg\>

#xcommand LOAD WINDOW <ww> AS <w: 0, NONAME, NIL, NULL, NONE> ;
   => ;
      _OOHG_TempWindowName := <(w)> ;;
      #include \<<ww>.fmg\>

#xcommand LOAD WINDOW <ww> AS <w> ;
   => ;
      _OOHG_TempWindowName := <(w)> ;;
      DECLARE WINDOW <w> ;;
      #include \<<ww>.fmg\>