aa
com.cliffc.aa.HM.HM4.Apply Class Reference
Inheritance diagram for com.cliffc.aa.HM.HM4.Apply:
[legend]
Collaboration diagram for com.cliffc.aa.HM.HM4.Apply:
[legend]

Public Member Functions

String p ()
 
final String toString ()
 

Package Functions

 Apply (Syntax fun, Syntax... args)
 
T2 find ()
 
T2 hm (Ary< Syntax > work)
 
void live (IBitSet visit)
 
boolean more_work (Ary< Syntax > work)
 
final boolean more_work_impl (Ary< Syntax > work)
 
final SB p0 (SB sb, VBitSet dups)
 
SB p1 (SB sb)
 
SB p2 (SB sb, VBitSet dups)
 
void prep_tree (Syntax par, Ary< Syntax > work)
 
void prep_tree_impl (Syntax par, T2 t, Ary< Syntax > work)
 
T2 prep_tree_lookup (String name, Syntax prior)
 
SB str (SB sb)
 

Package Attributes

final Syntax[] _args
 
final Syntax _fun
 
Syntax _par
 
T2 _t
 

Detailed Description

Definition at line 267 of file HM4.java.

Constructor & Destructor Documentation

◆ Apply()

com.cliffc.aa.HM.HM4.Apply.Apply ( Syntax  fun,
Syntax...  args 
)
package

Definition at line 270 of file HM4.java.

270 { _fun = fun; _args = args; }

References com.cliffc.aa.HM.HM4.Apply._args, and com.cliffc.aa.HM.HM4.Apply._fun.

Member Function Documentation

◆ find()

T2 com.cliffc.aa.HM.HM4.Syntax.find ( )
packageinherited

Definition at line 77 of file HM4.java.

77  { // U-F find
78  T2 t = _t.find();
79  return t==_t ? t : (_t=t);
80  }

References com.cliffc.aa.HM.HM4.Syntax._t, and com.cliffc.aa.HM.HM4.T2.find().

Referenced by com.cliffc.aa.HM.HM4.hm(), com.cliffc.aa.HM.HM4.Con.hm(), com.cliffc.aa.HM.HM4.Ident.hm(), com.cliffc.aa.HM.HM4.Lambda.hm(), com.cliffc.aa.HM.HM4.Lambda2.hm(), com.cliffc.aa.HM.HM4.Let.hm(), com.cliffc.aa.HM.HM4.Apply.hm(), and com.cliffc.aa.HM.HM4.Syntax.more_work_impl().

Here is the call graph for this function:
Here is the caller graph for this function:

◆ hm()

T2 com.cliffc.aa.HM.HM4.Apply.hm ( Ary< Syntax work)
package

Reimplemented from com.cliffc.aa.HM.HM4.Syntax.

Definition at line 284 of file HM4.java.

284  {
285  T2 tfun = _fun.find();
286  if( tfun.is_fresh() )
287  tfun.get_fresh().push_update(this);
288  T2[] targs = new T2[_args.length+1];
289  for( int i=0; i<_args.length; i++ )
290  targs[i] = _args[i].find();
291  // if testing, allow progress on the last new result tvar....
292  targs[_args.length] = Util.eq(tfun._name,"->") && work==null ? tfun.find(tfun._args.length-1) : T2.tnew(); // Return is new unconstrained T2
293  T2 nfun = T2.fun(targs);
294  T2 ufun = tfun.unify(nfun,work);
295  if( _fun.find()!=tfun && work!=null ) work.push(_fun);
296  // Return last element
297  T2 trez = ufun.find(_args.length);
298  // Force forward progress
299  return trez.unify(find(),work);
300  }

References com.cliffc.aa.HM.HM4.Apply._args, com.cliffc.aa.HM.HM4.T2._args, com.cliffc.aa.HM.HM4.Apply._fun, com.cliffc.aa.HM.HM4.T2._name, com.cliffc.aa.util.Util.eq(), com.cliffc.aa.HM.HM4.Syntax.find(), com.cliffc.aa.HM.HM4.T2.find(), com.cliffc.aa.HM.HM4.T2.fun(), com.cliffc.aa.HM.HM4.T2.get_fresh(), com.cliffc.aa.HM.HM4.T2.is_fresh(), com.cliffc.aa.util.Ary< E >.push(), com.cliffc.aa.HM.HM4.T2.push_update(), com.cliffc.aa.HM.HM4.T2.tnew(), and com.cliffc.aa.HM.HM4.T2.unify().

Here is the call graph for this function:

◆ live()

void com.cliffc.aa.HM.HM4.Apply.live ( IBitSet  visit)
package

Reimplemented from com.cliffc.aa.HM.HM4.Syntax.

Definition at line 312 of file HM4.java.

312  {
313  if( _t!=null ) _t.live(visit);
314  for( Syntax arg : _args ) arg.live(visit);
315  }

References com.cliffc.aa.HM.HM4.Apply._args, com.cliffc.aa.HM.HM4.Syntax._t, and com.cliffc.aa.HM.HM4.T2.live().

Here is the call graph for this function:

◆ more_work()

boolean com.cliffc.aa.HM.HM4.Apply.more_work ( Ary< Syntax work)
package

Reimplemented from com.cliffc.aa.HM.HM4.Syntax.

Definition at line 306 of file HM4.java.

306  {
307  if( !more_work_impl(work) ) return false;
308  if( !_fun.more_work(work) ) return false;
309  for( Syntax arg : _args ) if( !arg.more_work(work) ) return false;
310  return true;
311  }

References com.cliffc.aa.HM.HM4.Apply._args, com.cliffc.aa.HM.HM4.Apply._fun, com.cliffc.aa.HM.HM4.Syntax.more_work(), and com.cliffc.aa.HM.HM4.Syntax.more_work_impl().

Here is the call graph for this function:

◆ more_work_impl()

final boolean com.cliffc.aa.HM.HM4.Syntax.more_work_impl ( Ary< Syntax work)
packageinherited

Definition at line 91 of file HM4.java.

91  {
92  if( work.find(this)!=-1 ) return true; // On worklist, so ok
93  // Check does not make progress
94  int old = T2.CNT; int olen = work._len;
95  boolean more_work;
96  try {
97  T2 t = find();
98  Type con = t._con;
99  T2 hm = hm(null); // Run H-M, with null work, looking for progress
100  T2 un = find().unify(hm,null);
101  more_work = t!=un || con!=un._con || work._len!=olen; // Something happened?
102  assert !more_work;
103  } catch( RuntimeException no_unify ) { more_work=true; } // Fail to unify assert is progress
104  if( !more_work ) T2.CNT=old; // Reset if no error; prevents assert from endlessly raising CNT
105  return !more_work;
106  }

References com.cliffc.aa.HM.HM4.T2._con, com.cliffc.aa.util.Ary< E >._len, com.cliffc.aa.HM.HM4.T2.CNT, com.cliffc.aa.HM.HM4.Syntax.find(), com.cliffc.aa.util.Ary< E >.find(), com.cliffc.aa.HM.HM4.Syntax.hm(), com.cliffc.aa.HM.HM4.Syntax.more_work(), and com.cliffc.aa.HM.HM4.T2.unify().

Referenced by com.cliffc.aa.HM.HM4.Con.more_work(), com.cliffc.aa.HM.HM4.Ident.more_work(), com.cliffc.aa.HM.HM4.Lambda.more_work(), com.cliffc.aa.HM.HM4.Lambda2.more_work(), com.cliffc.aa.HM.HM4.Let.more_work(), and com.cliffc.aa.HM.HM4.Apply.more_work().

Here is the call graph for this function:
Here is the caller graph for this function:

◆ p()

String com.cliffc.aa.HM.HM4.Syntax.p ( )
inherited

Definition at line 111 of file HM4.java.

111 { return p0(new SB(), new VBitSet()).toString(); }

References com.cliffc.aa.HM.HM4.Syntax.p0(), and com.cliffc.aa.util.SB.toString().

Here is the call graph for this function:

◆ p0()

final SB com.cliffc.aa.HM.HM4.Syntax.p0 ( SB  sb,
VBitSet  dups 
)
packageinherited

Definition at line 112 of file HM4.java.

112  {
113  _t.get_dups(dups);
114  _t.str(p1(sb.i()).p(" "), new VBitSet(),dups).nl();
115  return p2(sb.ii(1),dups).di(1);
116  }

References com.cliffc.aa.HM.HM4.Syntax._t, com.cliffc.aa.util.SB.di(), com.cliffc.aa.HM.HM4.T2.get_dups(), com.cliffc.aa.util.SB.i(), com.cliffc.aa.util.SB.ii(), com.cliffc.aa.util.SB.nl(), com.cliffc.aa.util.SB.p(), com.cliffc.aa.HM.HM4.Syntax.p1(), com.cliffc.aa.HM.HM4.Syntax.p2(), and com.cliffc.aa.HM.HM4.T2.str().

Referenced by com.cliffc.aa.HM.HM4.Syntax.p(), com.cliffc.aa.HM.HM4.Lambda.p2(), com.cliffc.aa.HM.HM4.Lambda2.p2(), com.cliffc.aa.HM.HM4.Let.p2(), and com.cliffc.aa.HM.HM4.Apply.p2().

Here is the call graph for this function:
Here is the caller graph for this function:

◆ p1()

SB com.cliffc.aa.HM.HM4.Apply.p1 ( SB  sb)
package

Reimplemented from com.cliffc.aa.HM.HM4.Syntax.

Definition at line 277 of file HM4.java.

277 { return sb.p("(...)"); }

References com.cliffc.aa.util.SB.p().

Here is the call graph for this function:

◆ p2()

SB com.cliffc.aa.HM.HM4.Apply.p2 ( SB  sb,
VBitSet  dups 
)
package

Reimplemented from com.cliffc.aa.HM.HM4.Syntax.

Definition at line 278 of file HM4.java.

278  {
279  _fun.p0(sb,dups);
280  for( Syntax arg : _args ) arg.p0(sb,dups);
281  return sb;
282  }

References com.cliffc.aa.HM.HM4.Apply._args, com.cliffc.aa.HM.HM4.Apply._fun, and com.cliffc.aa.HM.HM4.Syntax.p0().

Here is the call graph for this function:

◆ prep_tree()

void com.cliffc.aa.HM.HM4.Apply.prep_tree ( Syntax  par,
Ary< Syntax work 
)
package

Reimplemented from com.cliffc.aa.HM.HM4.Syntax.

Definition at line 301 of file HM4.java.

301  {
302  prep_tree_impl(par,T2.tnew(),work);
303  _fun.prep_tree(this,work);
304  for( Syntax arg : _args ) arg.prep_tree(this,work);
305  }

References com.cliffc.aa.HM.HM4.Apply._args, com.cliffc.aa.HM.HM4.Apply._fun, com.cliffc.aa.HM.HM4.Syntax.prep_tree(), com.cliffc.aa.HM.HM4.Syntax.prep_tree_impl(), and com.cliffc.aa.HM.HM4.T2.tnew().

Here is the call graph for this function:

◆ prep_tree_impl()

void com.cliffc.aa.HM.HM4.Syntax.prep_tree_impl ( Syntax  par,
T2  t,
Ary< Syntax work 
)
packageinherited

Definition at line 86 of file HM4.java.

86 { _par=par; _t=t; work.push(this); }

References com.cliffc.aa.HM.HM4.Syntax._par, com.cliffc.aa.HM.HM4.Syntax._t, and com.cliffc.aa.util.Ary< E >.push().

Referenced by com.cliffc.aa.HM.HM4.Con.prep_tree(), com.cliffc.aa.HM.HM4.Ident.prep_tree(), com.cliffc.aa.HM.HM4.Lambda.prep_tree(), com.cliffc.aa.HM.HM4.Lambda2.prep_tree(), com.cliffc.aa.HM.HM4.Let.prep_tree(), and com.cliffc.aa.HM.HM4.Apply.prep_tree().

Here is the call graph for this function:
Here is the caller graph for this function:

◆ prep_tree_lookup()

T2 com.cliffc.aa.HM.HM4.Syntax.prep_tree_lookup ( String  name,
Syntax  prior 
)
packageinherited

Reimplemented in com.cliffc.aa.HM.HM4.Let, com.cliffc.aa.HM.HM4.Lambda2, and com.cliffc.aa.HM.HM4.Lambda.

Definition at line 87 of file HM4.java.

87 { return null; }

◆ str()

SB com.cliffc.aa.HM.HM4.Apply.str ( SB  sb)
package

Reimplemented from com.cliffc.aa.HM.HM4.Syntax.

Definition at line 271 of file HM4.java.

271  {
272  _fun.str(sb.p("(")).p(" ");
273  for( Syntax arg : _args )
274  arg.str(sb).p(" ");
275  return sb.unchar().p(")");
276  }

References com.cliffc.aa.HM.HM4.Apply._args, com.cliffc.aa.HM.HM4.Apply._fun, com.cliffc.aa.util.SB.p(), com.cliffc.aa.HM.HM4.Syntax.str(), and com.cliffc.aa.util.SB.unchar().

Here is the call graph for this function:

◆ toString()

final String com.cliffc.aa.HM.HM4.Syntax.toString ( )
inherited

Definition at line 108 of file HM4.java.

108 { return str(new SB()).toString(); }

References com.cliffc.aa.HM.HM4.Syntax.str(), and com.cliffc.aa.util.SB.toString().

Here is the call graph for this function:

Member Data Documentation

◆ _args

◆ _fun

◆ _par

Syntax com.cliffc.aa.HM.HM4.Syntax._par
packageinherited

◆ _t


The documentation for this class was generated from the following file:
com.cliffc.aa.HM.HM4.T2.str
SB str(SB sb, VBitSet visit, VBitSet dups)
Definition: HM4.java:612
com.cliffc.aa.util.Ary.push
E push(E e)
Add element in amortized constant time.
Definition: Ary.java:58
com.cliffc.aa.HM.HM4.T2.push_update
void push_update(Syntax a)
Definition: HM4.java:582
com.cliffc.aa.util.Util.eq
static boolean eq(String s0, String s1)
Definition: Util.java:16
com.cliffc.aa.util.SB.ii
SB ii(int i)
Definition: SB.java:44
com.cliffc.aa.util.SB.di
SB di(int i)
Definition: SB.java:46
com.cliffc.aa.HM.HM4.Syntax.prep_tree_impl
void prep_tree_impl(Syntax par, T2 t, Ary< Syntax > work)
Definition: HM4.java:86
com.cliffc.aa.HM.HM4.Syntax.hm
abstract T2 hm(Ary< Syntax > work)
com.cliffc.aa.type.Type
an implementation of language AA
Definition: Type.java:94
com.cliffc.aa.util.Ary._len
int _len
Definition: Ary.java:13
com.cliffc.aa.HM.HM4.T2.get_dups
VBitSet get_dups(VBitSet dups)
Definition: HM4.java:599
com.cliffc.aa.util.SB.unchar
SB unchar()
Definition: SB.java:58
com.cliffc.aa.HM.HM4.Apply._fun
final Syntax _fun
Definition: HM4.java:268
com.cliffc.aa.HM.HM4.Syntax.more_work
abstract boolean more_work(Ary< Syntax > work)
com.cliffc.aa.HM.HM4.T2.get_fresh
T2 get_fresh()
Definition: HM4.java:365
com.cliffc.aa.HM.HM4.Syntax.p2
abstract SB p2(SB sb, VBitSet dups)
com.cliffc.aa.util.Util
Definition: Util.java:5
com.cliffc.aa.HM.HM4.Apply._args
final Syntax[] _args
Definition: HM4.java:269
com.cliffc.aa.HM.HM4.Syntax.find
T2 find()
Definition: HM4.java:77
com.cliffc.aa.util.VBitSet
Definition: VBitSet.java:5
com.cliffc.aa.util.SB
Tight/tiny StringBuilder wrapper.
Definition: SB.java:8
com.cliffc.aa.util.SB.nl
SB nl()
Definition: SB.java:48
com.cliffc.aa.HM.HM4.T2.find
T2 find()
Definition: HM4.java:378
com.cliffc.aa.util.SB.p
SB p(String s)
Definition: SB.java:13
com.cliffc.aa.HM.HM4.T2.live
void live(IBitSet visit)
Definition: HM4.java:372
com.cliffc.aa.HM.HM4.Syntax.more_work_impl
final boolean more_work_impl(Ary< Syntax > work)
Definition: HM4.java:91
com.cliffc.aa.HM.HM4.Syntax.prep_tree
abstract void prep_tree(Syntax par, Ary< Syntax > work)
com.cliffc.aa.HM.HM4.Syntax._par
Syntax _par
Definition: HM4.java:75
com.cliffc.aa.util.SB.i
SB i(int d)
Definition: SB.java:38
com.cliffc.aa.util.Ary.find
int find(E e)
Find the first matching element using ==, or -1 if none.
Definition: Ary.java:192
com.cliffc.aa.HM.HM4.T2.unify
T2 unify(T2 t, Ary< Syntax > work)
Definition: HM4.java:415
com.cliffc.aa.HM.HM4.Syntax.str
abstract SB str(SB sb)
com.cliffc.aa.HM.HM4.Syntax._t
T2 _t
Definition: HM4.java:76
com.cliffc.aa.util.SB.toString
String toString()
Definition: SB.java:62
com.cliffc.aa.HM.HM4.Syntax.p0
final SB p0(SB sb, VBitSet dups)
Definition: HM4.java:112
com.cliffc.aa.HM.HM4.Syntax.p1
abstract SB p1(SB sb)