1  # $Id: store.rb,v 1.4 2011/12/08 11:33:17 machan Exp $
   2 
   3  require 'tmdoc/tmstd'
   4  require 'tmdoc/constant'
   5  require 'tmdoc/model/document/abstraction'
   6  require 'tmdoc/model/document/link'
   7  require 'tmdoc/model/document/overview'
   8  require 'tmdoc/model/document/module'
   9  require 'tmdoc/model/document/source'
  10 
  11 
  12  module TmDoc
  13 
  14  module Model::Document
  15 
  16  class Store < Model::Abstraction::Store
  17      attr_reader :an_overview,
  18                  :unknown_modules,
  19                  :builtin_modules,
  20                  :user_modules,
  21                  :sources
  22 
  23 
  24      def initialize(
  25          an_overview,
  26          unknown_modules,
  27          builtin_modules,
  28          user_modules,
  29          sources
  30      )
  31          ASSERT.opt_kind_of an_overview,     Overview::Overview
  32          ASSERT.opt_kind_of unknown_modules, Module::SeqOfModule
  33          ASSERT.opt_kind_of builtin_modules, Module::SeqOfModule
  34          ASSERT.opt_kind_of user_modules,    Module::SeqOfModule
  35          ASSERT.opt_kind_of sources,         Source::SeqOfSource
  36 
  37          @an_overview        = an_overview
  38          @unknown_modules    = unknown_modules
  39          @builtin_modules    = builtin_modules
  40          @user_modules       = user_modules
  41          @sources            = sources
  42      end
  43 
  44 
  45      def print
  46          LOG::Debug.log '======== Document Model ========'
  47          if self.an_overview
  48              LOG::Debug.log '---- Overview ----'
  49              self.an_overview.print
  50              LOG::Debug.log
  51          end
  52 
  53          LOG::Debug.log '---- Built-in Modules and Classes ----'
  54          if self.builtin_modules
  55              for a_module in self.builtin_modules
  56                  a_module.print
  57                  LOG::Debug.log
  58              end
  59          end
  60 
  61          LOG::Debug.log '---- Unknown Modules and Classes ----'
  62          if self.unknown_modules
  63              for a_module in self.unknown_modules
  64                  a_module.print
  65                  LOG::Debug.log
  66              end
  67          end
  68 
  69          LOG::Debug.log '---- User Modules and Classes ----'
  70          if self.user_modules
  71              for a_module in self.user_modules
  72                  a_module.print
  73                  LOG::Debug.log
  74              end
  75          end
  76 
  77          LOG::Debug.log '---- Sources ----'
  78          if self.sources
  79              for a_source in self.sources
  80                  a_source.print
  81                  LOG::Debug.log
  82              end
  83          end
  84 
  85          nil
  86      end
  87  end
  88 
  89  end # TmDoc::Model::Document
  90 
  91  end # TmDoc