Provides unit tests and examples for the Quote lens.
Test_Quote | Provides unit tests and examples for the Quote lens. |
double | |
double | |
double_opt | |
double_opt | |
double_opt | |
double_opt | Value cannot start with a space |
single | |
single | |
single_opt | |
single_opt | |
single_opt | |
single_opt | Value cannot start with a space |
any | |
any | |
any | |
any_opt | |
any_opt | |
any_opt | |
any_opt | |
any_opt | Value cannot start with a space |
double_opt_allow_spc | |
double_opt_allow_spc | |
quote_spaces | |
quote_spaces | |
quote_spaces | Unquoted value |
quote_spaces | double quoted value |
quote_spaces | single quoted value |
quote_spaces | unquoted value with spaces |
quote_spaces | double quoted value with spaces |
quote_spaces | single quoted value with spaces |
quote_spaces | remove spaces from double-quoted value |
quote_spaces | remove spaces from single-quoted value |
quote_spaces | add spaces to unquoted value |
quote_spaces | add spaces to double-quoted value |
quote_spaces | add spaces to single-quoted value |
dquote_spaces | |
dquote_spaces | |
dquote_spaces | Unquoted value |
dquote_spaces | double quoted value |
dquote_spaces | single quoted value |
dquote_spaces | unquoted value with spaces |
dquote_spaces | double quoted value with spaces |
dquote_spaces | single quoted value with spaces |
dquote_spaces | remove spaces from double-quoted value |
dquote_spaces | add spaces to unquoted value |
dquote_spaces | add spaces to double-quoted value |
dquote_spaces | add spaces to single-quoted value |
squote_spaces | |
squote_spaces | |
squote_spaces | Unquoted value |
squote_spaces | double quoted value |
squote_spaces | single quoted value |
squote_spaces | unquoted value with spaces |
squote_spaces | double quoted value with spaces |
squote_spaces | single quoted value with spaces |
squote_spaces | remove spaces from single-quoted value |
squote_spaces | add spaces to unquoted value |
squote_spaces | add spaces to double-quoted value |
squote_spaces | add spaces to single-quoted value |
nil cases | |
dquote_opt_nil | |
dquote_opt_nil | |
dquote_opt_nil | |
dquote_opt_nil | |
dquote_opt_nil | |
dquote_opt_nil | |
dquote_opt_nil | |
squote_opt_nil | |
squote_opt_nil | |
squote_opt_nil | |
squote_opt_nil | |
squote_opt_nil | |
squote_opt_nil | |
squote_opt_nil | |
quote_opt_nil | |
quote_opt_nil | |
quote_opt_nil | |
quote_opt_nil | |
quote_opt_nil | |
quote_opt_nil | |
quote_opt_nil |
let double = [ label "double" . Quote.double ]
let double_opt = [ label "double_opt" . Quote.double_opt ]
let single = [ label "single" . Quote.single ]
let single_opt = [ label "single_opt" . Quote.single_opt ]
let any = [ label "any" . Quote.any ]
let any_opt = [ label "any_opt" . Quote.any_opt ]
let double_opt_allow_spc = let body = store /[^\n"]+/ in [ label "double" . Quote.do_dquote_opt body ]
let quote_spaces = Quote.quote_spaces (label "spc")
let dquote_spaces = Quote.dquote_spaces (label "spc")
let squote_spaces = Quote.squote_spaces (label "spc")
let dquote_opt_nil = let body = store Quote.double_opt_re in [ label "dquote_opt_nil" . Quote.do_dquote_opt_nil body ]?
let squote_opt_nil = let body = store Quote.single_opt_re in [ label "squote_opt_nil" . Quote.do_squote_opt_nil body ]?
let quote_opt_nil = let body = store Quote.any_opt_re in [ label "quote_opt_nil" . Quote.do_quote_opt_nil body ]?