Login | Register
My pages Projects Community openCollabNet

Discussions > commits > svn commit: r30 - trunk

genelib
Discussion topic

Back to topic list

svn commit: r30 - trunk

Author lotec
Full name Jan Bogaerts
Date 2006-03-21 11:33:35 PST
Message Author: lotec
Date: Tue Mar 21 11:33:35 2006
New Revision: 30

Modified:
   trunk/BaseStore.gen
Log:
basestore now uses yield forthe loops in the defintion, not yet in the implementation

Modified: trunk/BaseStore.gen
Url: http://genelib.tigri​s.org/source/browse/​genelib/trunk/BaseSt​ore.gen?view=diff​&rev=30&p1=trun​k/BaseStore.gen&​r1=29&p2=trunk/B​aseStore.gen&r2=​30
====================​====================​====================​==================
--- trunk/BaseStore.gen (original)
+++ trunk/BaseStore.gen Tue Mar 21 11:33:35 2006
@@ -55,7 +55,7 @@
  pos @ GetAtPos(aIndex: int): pointer inline
            read GetPos(aVal: pointer): int inline
            write SetPos(aNew: int, aVal: pointer)
- loop DoLoop
+ loop DoLoop yield pointer
  operator '<<' CopyLData(aSize: dword): pointer inline
            '<<' CopyLDataInsert(aSize: dword, aBefore: pointer): pointer inline
            '>>' RemoveDataByRef(aVal: pointer) inline
@@ -297,7 +297,7 @@
  next read GetNext(aItem: pointer): pointer
  prev read GetPrev(aItem: pointer): pointer inline static = return(pointer(sStac​kItem^(aItem).PrevIt​em));
  nrrecords read GetNrRecords: int inline = return(RecCount);
- loop DoLoop
+ loop DoLoop yield pointer
  operator '<<' CopyLData(aSize: dword): pointer inline
            '>>' RemoveDataByRef(aVal: pointer, aSize: int) inline
  destructor Destroy default
@@ -461,7 +461,7 @@
  next read GetNext(aItem: pointer): pointer inline static = return(pointer(sQueu​eItem^(aItem).NextIt​em));
  prev read GetPrev(aItem: pointer): pointer
  nrrecords read GetNrRecords: int inline = return(RecCount);
- loop DoLoop
+ loop DoLoop yield pointer
  operator '<<' CopyLData(aSize: dword): pointer inline
            '>>' RemoveDataByRef(aVal: pointer, aSize: int) inline
  destructor Destroy default
@@ -578,7 +578,7 @@
    prev read GetPrev(aVal: pointer, aSize: int): pointer inline
    nrrecords read GetNrRecords: dword inline
              write SetNrRecords(aValue: int, aSize: int)
- loop DoLoop(aSize: int)
+ loop DoLoop(aSize: int) yield pointer
    pos @ GetAtPos(aIndex: int, aSize: int): pointer inline
        read GetPos(aVal: pointer, aSize: int): int inline
    exp AddBlock(aData: pointer, aSize: dword, aElSize: dword) //this will add a data block to ours, it knows how much because of the /0 at the end which is for what it checks
@@ -830,7 +830,7 @@
    prev read GetPrev(aVal: pointer, aSize: int): pointer inline
    nrrecords read GetNrRecords: dword inline
              write SetNrRecords(aValue: int, aSize: int)
- loop DoLoop(aSize: int)
+ loop DoLoop(aSize: int) yield pointer
    pos @ GetAtPos(aIndex: int, aSize: int): pointer inline
        read GetPos(aVal: pointer, aSize: int): int inline
    operator

« Previous message in topic | 1 of 1 | Next message in topic »

Messages

Show all messages in topic

svn commit: r30 - trunk lotec Jan Bogaerts 2006-03-21 11:33:35 PST
Messages per page: