sica-fondt/reference/adayaml-parser/implementation/yaml-presenter-analysis.ads
Claude 24f816b6a3
Consolidate 22 sibling repos into layered organism structure
Place useful parts of the surrounding repos into sica-fondt by layer, per the
body model (Ada = membrane; brain/endocrine/capabilities/knowledge non-Ada):

- brain/        LLM reasoning + providers (dapr, hermes, MoMoA)
- capabilities/ REPRAG sidecars: hermes tools/skills, dapr tools, parallel
                dispatch, A51 channels, and the OSINT cluster
- knowledge/    LORAG corpus: 754 cyber-skills, agency personas, secure-coding,
                MITRE ATT&CK data
- reference/    defensive threat-reference (C3, shhbruh doc) + AdaYaml parser

License handling: AGPL sources (worldosint, advanced_evolution, mercury,
Reticulum) and GPL DeTTECT are SPEC-only clean-room/port descriptions — no
copyleft code copied. MIT/Apache/data parts copied as working trees.

Safety: shhbruh escape/persistence material and C3 covert-C2 kept as reference
only, not wired into the running organism. See CONSOLIDATION.md.

https://claude.ai/code/session_01UehUqEXXJJCsHoA4voCU5c
2026-06-10 06:53:01 +00:00

35 lines
1.5 KiB
Ada

-- part of AdaYaml, (c) 2017 Felix Krause
-- released under the terms of the MIT license, see the file "copying.txt"
private package Yaml.Presenter.Analysis is
-- this package analyzes scalars to check how they can be represented
type Necessary_Quoting is (None, Only_In_Flow, Single, Double);
type Scalar_Features is record
Max_Word_Length : Natural;
-- the longest word in the string. a word is anything between two
-- places where a folded scalar could be broken up.
Max_Line_Length : Natural;
-- the longest line in the string. a line is anything between two
-- line feeds.
Single_Line_Length : Natural;
-- length of this string if it was rendered in a single line,
-- excluding possibly necessary quoting signs.
Quoting_Needed : Necessary_Quoting;
-- minimum quoting level of this scalar if rendered as flow scalar.
Unquoted_Single_Line : Boolean;
-- true iff this string can be rendered unquoted as single-line scalar
Folding_Possible : Boolean;
-- true iff this string can be represented as folded (block) scalar
Contains_Non_Printable : Boolean;
-- true iff this string contains non-printable characters
Leading_Spaces : Natural;
-- number of leading spaces
Trailing_Linefeeds : Natural;
-- number of trailing spaces
end record;
function Features (S : String) return Scalar_Features;
end Yaml.Presenter.Analysis;