/[marvin]/marvin/src/libnn/corpus.ml
ViewVC logotype

Diff of /marvin/src/libnn/corpus.ml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.8 by matthieu, Wed Jul 16 21:45:15 2003 UTC revision 1.9 by matthieu, Thu Jul 17 00:06:55 2003 UTC
# Line 83  object Line 83  object
83    (**    (**
84      Adds a pattern to the object's patterns set.      Adds a pattern to the object's patterns set.
85    *)    *)
86    method addPattern (thePattern : pattern) = List.append _patterns [thePattern]    method addPattern (thePattern : pattern) = _patterns <- thePattern::_patterns
87    
88    (**    (**
89      Get the current learning position      Get the current learning position

Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26