equal
deleted
inserted
replaced
62 ! ! |
62 ! ! |
63 |
63 |
64 !PPStream methodsFor:'queries'! |
64 !PPStream methodsFor:'queries'! |
65 |
65 |
66 insideCRLF |
66 insideCRLF |
67 (position < 1) ifTrue: [ ^ false ]. |
67 (position < 1) ifTrue: [ ^ false ]. |
68 |
68 |
69 ^ (self peek = Character lf) and: [ self peekBack = Character cr ] |
69 ^ (self peek = (Character codePoint: 10)) and: [ self peekBack = (Character codePoint: 13) ] |
|
70 |
|
71 "Modified: / 03-10-2014 / 23:52:33 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
70 ! |
72 ! |
71 |
73 |
72 isStartOfLine |
74 isStartOfLine |
73 (position = 0) ifTrue: [ ^ true ]. |
75 (position = 0) ifTrue: [ ^ true ]. |
74 |
76 |
75 self insideCRLF ifTrue: [ ^ false ]. |
77 self insideCRLF ifTrue: [ ^ false ]. |
76 |
78 |
77 ^ (self peekBack = Character cr) or: [ self peekBack = Character lf]. |
79 ^ (self peekBack = (Character codePoint: 13)) or: [ self peekBack = (Character codePoint: 10)]. |
|
80 |
|
81 "Modified: / 03-10-2014 / 23:52:56 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
78 ! ! |
82 ! ! |
79 |
83 |
80 !PPStream class methodsFor:'documentation'! |
84 !PPStream class methodsFor:'documentation'! |
81 |
85 |
82 version |
86 version |