dvanarkel / clean-bbedit

Clean support in BBEdit

Hi there 👋

clean-bbedit's Issues

Add upstream branch + actions for Eastwood sources

Use GitHub actions + cron to auto-mirror the original source repositories into upstream-xxx branches

https://gitlab.com/top-software/eastwood
clean-lsp
yaml

Generate pull requests from the same action to merge into our single 'eastwood' development branch?

Investigate BBEdit coded language support

This gives us access to better language support, eg tags and folding
Maybe even build and run support

Issue of course is that we don't feel like writing C code

Create and populate `eastwood` branch

[ ] Setup the eastwood branch
[ ] Pull in from the upstream-xxx branches
[ ] Merge changes

Char constant '\\' does not syntax colour correctly

eg from scanner module of clean compiler:

ScanChar :: !Input -> (!Token, !Input)
ScanChar input
# (eof, c, input) = ReadChar input // PK: was ReadNormalChar input
| eof = (ErrorToken "End of file inside Char denotation", input)
| c==''' = (CharListToken "", input)
| c=='\' = ScanBSChar 0 ['''] input ScanEndOfChar
= ScanEndOfNoBSChar c input

ScanBSChar :: !Int ![Char] !Input (Int [Char] Input -> (Token, Input)) -> (!Token, !Input)
ScanBSChar n chars input cont
# (eof, c, input) = ReadNormalChar input
| eof = cont n chars input
= case c of
'n' -> cont (n+2) ['n','\':chars] input // (['n','\':chars], n + 2, input)
'r' -> cont (n+2) ['r','\':chars] input // (['r','\':chars], n + 2, input)
'f' -> cont (n+2) ['f','\':chars] input // (['f','\':chars], n + 2, input)
'b' -> to_chars '\b' input
't' -> cont (n+2) ['t','\':chars] input // (['t','\':chars], n + 2, input)
'v' -> to_chars '\v' input
'\' -> cont (n+2) ['\','\':chars] input // (['\','\':chars], n + 2, input)
'"' -> cont (n+2) ['"','\':chars] input // (['"' ,'\':chars], n + 2, input)
''' -> cont (n+2) [''','\':chars] input // ([''','\':chars], n + 2, input)
'x' -> ScanNumChar Hex isHexDigit 2 0 input // max 2 characters
'X' -> ScanNumChar Hex isHexDigit 2 0 input // max 2 characters
'd' -> ScanNumChar Dec isDigit 3 0 input // max 3 characters
'D' -> ScanNumChar Dec isDigit 3 0 input // max 3 characters
'0' -> ScanNumChar Oct IsOct 3 0 input // max 3 characters
c | IsOct c
-> ScanNumChar Oct IsOct 2 (digitToInt c) input // max 2 more characters, 3 including current
-> cont (n+1) [c:chars] input

shows the error