# Copyright 2005-2007 Kevin Reid, under the terms of the MIT X license
# found at http://www.opensource.org/licenses/mit-license.html ................

pragma.syntax("0.9")

def AssocFunc := any # XXX point to interface

def File := <import:org.cubik.cle.makeAdvisoryInterface>(
interface "org.cubik.cle.file.File" {
  to exists() :boolean
  to get(subpath :String) :File
  to getOpt(subpath :String) :nullOk[File]
  to getText() :String # XXX failure?
  to getTwine() :Twine # XXX failure?
  to deepReadOnly() :File
  to shallowReadOnly() :File
  to iterate(f :AssocFunc) :void
})

# XXX all methods, docs