MCPcopy Index your code
hub / github.com/clojure/clojure / commonPath

Method commonPath

src/jvm/clojure/lang/Compiler.java:7842–7853  ·  view source on GitHub ↗
(PathNode n1, PathNode n2)

Source from the content-addressed store, hash-verified

7840}
7841
7842static PathNode commonPath(PathNode n1, PathNode n2){
7843 ISeq xp = fwdPath(n1);
7844 ISeq yp = fwdPath(n2);
7845 if(RT.first(xp) != RT.first(yp))
7846 return null;
7847 while(RT.second(xp) != null && RT.second(xp) == RT.second(yp))
7848 {
7849 xp = xp.next();
7850 yp = yp.next();
7851 }
7852 return (PathNode) RT.first(xp);
7853}
7854
7855static void addAnnotation(Object visitor, IPersistentMap meta){
7856 if(meta != null && ADD_ANNOTATIONS.isBound())

Callers 1

LocalBindingExprMethod · 0.80

Calls 4

fwdPathMethod · 0.95
firstMethod · 0.95
secondMethod · 0.95
nextMethod · 0.95

Tested by

no test coverage detected