{ ==file
  "trying to frobnicate file" dump file dump
  file "conf" eq
  1 or
  { ??io.read } rep # oops, this failed
  "continuing frobnication..." dump
} /frobnicateFile deffst

{
  { ==doItManually
    "conf" ==file !!? ==restartFrobnication
    {
      file frobnicateFile
    } {
      -- <
        { "conf.bak" =file restartFrobnication 0 ! } =*useBackup
        { "Enter config by hand" dump doItManually 0 ! } =*manualEntry
      > ??!io
    } ?!io
  } {
    "manual entry starting (and grabbing stack)" dump
  } !!'
} /frobnicateConfig deffst


{
  {
    frobnicateConfig
  } {
    -- "fail :(" die
  } ?!io
} /frobnicateUI deffst

{
  {
    frobnicateConfig
  } {
    {
      "using backup config" dump .useBackup
    } {
      "last resort" dump .manualEntry
    } ?!io
  } ?!io
} /frobnicateUIBetter deffst

{
  {
    frobnicateConfig
  } [
    { "using backup config" dump .useBackup }
    { "last resort" dump .manualEntry }
  ] ?!!io
} /frobnicateUIBest deffst

frobnicateUIBest

# vim: syntax=elymas