mirror of
https://github.com/notepad-plus-plus/notepad-plus-plus.git
synced 2025-08-26 12:18:31 +02:00
213e9135ba
Release 5.5.3 (https://www.scintilla.org/scintilla553.zip) Released 19 October 2024. On Win32 change direction of horizontal mouse wheel and touchpad scrolling to match other applications. Bug #2449. Release 5.4.1 (https://www.scintilla.org/lexilla541.zip) Released 19 October 2024. Lexer added for Dart "dart". Pull request #265, Pull request #275. Lexer added for troff / nroff "troff". Pull request #264. Lexer added for Zig "zig". Pull request #267. C++: Fix crash for empty documentation comment keyword where '<' occurs at line end. F#: Include EOLs in the style range of SCE_FSHARP_COMMENTLINE. Stabilizes EOL detection when folding line comment groups. Issue #276. F#: Fix per-line folding in F# documents. Issue #277. HTML: Improve SGML/DTD lexing. Don't terminate SGML when > inside quoted string. Lex both [ and ] as SCE_H_SGML_DEFAULT. Nested sections handled instead of switching to SCE_H_SGML_ERROR. Issue #272. JavaScript: New SCE_HJ_TEMPLATELITERAL and SCE_HJA_TEMPLATELITERAL styles for template literals when lexer is hypertext, or xml. Issue #280. PHP: Fix failure to recognize PHP start "<?php' at end of document. Caused by not capping retrieval range at document end causing no text to be retrieved. Issue #269. Smalltalk: Fix scaled decimal numbers without decimal separator. Pull request #274. Fix #15228, fix #15368, fix #15650, close #15717
47 lines
1.6 KiB
Plaintext
47 lines
1.6 KiB
Plaintext
2 400 401 + (*
|
|
0 401 401 | (** nested comment 1 **)
|
|
2 401 402 + (*
|
|
0 402 402 | nested comment 2
|
|
2 402 403 + (*
|
|
0 403 403 | nested comment 3
|
|
2 403 404 + (*
|
|
0 404 404 | nested comment 4
|
|
2 404 405 + (*
|
|
0 405 405 | nested comment 5
|
|
0 405 404 | *)
|
|
0 404 403 | *)
|
|
0 403 402 | *)
|
|
0 402 401 | *)
|
|
0 401 400 | *)
|
|
2 400 401 + // declare a namespace
|
|
0 401 400 | // for the module
|
|
0 400 400 namespace Issue93
|
|
1 400 400
|
|
0 400 400 module NestedComments =
|
|
2 400 401 + open FSharp.Quotations
|
|
0 401 400 | open FSharp.Quotations.Patterns
|
|
2 400 401 + // print the arguments
|
|
0 401 400 | // of an evaluated expression
|
|
2 400 401 + (* Example:
|
|
2 401 402 + (*
|
|
0 402 402 | printArgs <@ 1 + 2 @> ;;
|
|
0 402 402 | // 1
|
|
0 402 402 | // 2
|
|
0 402 401 | *)
|
|
0 401 400 | *)
|
|
0 400 400 let printArgs expr =
|
|
0 400 400 let getVal = function Value (v, _) -> downcast v | _ -> null
|
|
0 400 400 match expr with
|
|
0 400 400 | Call (_, _, args) ->
|
|
0 400 400 List.map getVal args |> List.iter (printfn "%A")
|
|
0 400 400 | _ ->
|
|
0 400 400 printfn "not an evaluated expression"
|
|
2 400 401 + (* Example:
|
|
2 401 402 + (*
|
|
0 402 402 | let constExpr = <@ true @> ;;
|
|
0 402 402 | printArgs constExpr ;;
|
|
0 402 401 | *)
|
|
0 401 400 | *)
|
|
2 400 401 + // Prints:
|
|
0 401 400 | // "not an evaluated expression"
|
|
0 400 0 |