equal
deleted
inserted
replaced
1857 |
1857 |
1858 src := aMethod source ? ''. |
1858 src := aMethod source ? ''. |
1859 src asCollectionOfLines size < UserPreferences current numberOfLinesForLongMethod "~~30" ifTrue:[^ false]. |
1859 src asCollectionOfLines size < UserPreferences current numberOfLinesForLongMethod "~~30" ifTrue:[^ false]. |
1860 |
1860 |
1861 "/ ok, it is long; |
1861 "/ ok, it is long; |
1862 "/ but do not blame the user for writing documentation (dont count comments), |
1862 "/ but do not blame the user for writing documentation (don't count comments), |
1863 "/ or using literal arrays |
1863 "/ or using literal arrays |
1864 RBParser notNil ifTrue:[ |
1864 RBParser notNil ifTrue:[ |
1865 ast := RBParser parseMethod:src. |
1865 ast := RBParser parseMethod:src. |
1866 ast notNil ifTrue:[ |
1866 ast notNil ifTrue:[ |
1867 visitor := RBProgramNodeVisitor new. |
1867 visitor := RBProgramNodeVisitor new. |