Return this from a PreCompact hook callback to control whether compaction should proceed.
Examples
# Allow compaction
HookResultPreCompact()
#> $continue
#> [1] TRUE
#>
#> $summary
#> NULL
#>
#> attr(,"class")
#> [1] "HookResultPreCompact" "HookResult" "list"
# Cancel compaction
HookResultPreCompact(continue = FALSE)
#> $continue
#> [1] FALSE
#>
#> $summary
#> NULL
#>
#> attr(,"class")
#> [1] "HookResultPreCompact" "HookResult" "list"
# Provide custom summary
HookResultPreCompact(summary = "Previous conversation discussed X, Y, Z.")
#> $continue
#> [1] TRUE
#>
#> $summary
#> [1] "Previous conversation discussed X, Y, Z."
#>
#> attr(,"class")
#> [1] "HookResultPreCompact" "HookResult" "list"