steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

modern.slices: more escapes

locals-and-roots
Doug Coleman 2016-06-17 14:37:46 -07:00
parent 8a6dbdcb62
commit 5a4f41fc85
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
core/modern/slices/slices.factor
View File

@ -6,11 +6,11 @@ in: modern.slices
: matching-delimiter ( ch -- ch' ) : matching-delimiter ( ch -- ch' )
H{ H{
{ char: \( char: ) } { char: \( char: \) }
{ char: \[ char: ] } { char: \[ char: \] }
{ char: \{ char: } } { char: \{ char: \} }
{ char: < char: > } { char: \< char: \> }
{ char: \: char: ; } { char: \: char: \; }
} ?at drop ; } ?at drop ;
: matching-delimiter-string ( string -- string' ) : matching-delimiter-string ( string -- string' )