Ignore:
Timestamp:
Oct 2, 2008, 6:13:11 PM (12 years ago)
Author:
yura
Message:
  • Expr.concat(Comparable, Expr) checks if term in array of expr and before it.
  • XML parsing.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • to-imperative/trunk/java/refal/refal/plus/Stream.rf

    r3614 r3953  
    9797};
    9898
     99Scans stream e1, {
     100  <Gets stream <Length e1>> : {
     101    e1 = e1;
     102    e2 = <Ungets stream e2>;
     103  };
     104  /*empty*/;
     105};
     106
     107//** $func Get-Delim stream t.delim = expr;
     108
     109Get_Delims stream e.delim, {
     110  <Scans stream e.delim> : e.delim = e.delim;
     111  <Getc stream> :: t1 = t1 <Get_Delims stream e.delim>;
     112  /*empty*/;
     113};
    99114
    100115//** $func Get-Delim stream t.delim = expr;
Note: See TracChangeset for help on using the changeset viewer.