|
48 | 48 | :content |
49 | 49 | (str "Root directory not provided So this will not be a prompt." "::" working-dir "::")}]})))}) |
50 | 50 |
|
51 | | -(def clojure-system-repl-form-edit |
52 | | - {:name "clojure_repl_system_prompt" |
53 | | - :description "Provides instructions and guidelines for Clojure development, including style and best practices." |
54 | | - :arguments [] ;; No arguments needed for this prompt |
55 | | - :prompt-fn (simple-content-prompt-fn |
56 | | - "System Prompt: Clojure REPL" |
57 | | - (str |
58 | | - (load-prompt-from-resource "clojure-mcp/prompts/system/clojure_repl_form_edit.md") |
59 | | - (load-prompt-from-resource "clojure-mcp/prompts/system/clojure_form_edit.md")))}) |
60 | | - |
61 | | -(def clojure-spec-driven-modifier |
62 | | - {:name "clj-spec-driven-modifier" |
63 | | - :description "Spec first modifer for REPL-driven development" |
64 | | - :arguments [] ;; No arguments needed |
65 | | - :prompt-fn (simple-content-prompt-fn |
66 | | - "Spec-Driven-Development Modifier for Clojure" |
67 | | - (load-prompt-from-resource "clojure-mcp/prompts/spec_modifier.md"))}) |
68 | | - |
69 | | -(def clojure-test-driven-modifier |
70 | | - {:name "clj-test-driven-modifier" |
71 | | - :description "Test driven modifer for REPL-driven development" |
72 | | - :arguments [] ;; No arguments needed |
73 | | - :prompt-fn (simple-content-prompt-fn |
74 | | - "Test-Driven-Development Modifier for Clojure" |
75 | | - (load-prompt-from-resource "clojure-mcp/prompts/test_modifier.md"))}) |
76 | | - |
77 | | -#_(def incremental-file-creation |
78 | | - {:name "incremental_file_creation" |
79 | | - :description "Guide for creating Clojure files incrementally to maximize success." |
80 | | - :arguments [] ;; No arguments needed for this prompt |
81 | | - :prompt-fn (simple-content-prompt-fn |
82 | | - "Incremental File Creation for Clojure" |
83 | | - (load-prompt-from-resource "clojure-mcp/prompts/system/incremental_file_creation.md"))}) |
84 | | - |
85 | | -(def scratch-pad-guide |
86 | | - {:name "use-scratch-pad" |
87 | | - :description "Guide for using the scratch pad tool for persistent storage and task tracking" |
88 | | - :arguments [] |
89 | | - :prompt-fn (simple-content-prompt-fn |
90 | | - "Use Scratch Pad" |
91 | | - "Let's use the scratch_pad tool.\n\nThe scratch_pad tool is your persistent storage for data between tool calls. Use it to:\n\n1. **Track Tasks**: Create todo lists to manage complex workflows\n2. **Store Intermediate Results**: Save computation results for later use\n3. **Share Context**: Pass data between different agents or tool sequences\n4. **Build Complex Data**: Incrementally construct data structures\n\nExample todo workflow:\n```clojure\n;; Add tasks\nscratch_pad(op: set_path, path: [\"todos\"], \n value: {0: {task: \"Analyze code\", done: false},\n 1: {task: \"Write tests\", done: false}})\n\n;; Check off completed\nscratch_pad(op: set_path, path: [\"todos\" 0 \"done\"], value: true)\n\n;; View progress\nscratch_pad(op: tree_view)\n```\n\nBest practices:\n- Use descriptive keys for organization\n- Store results you'll need later\n- Track progress on multi-step tasks\n- Clean up completed items when done")}) |
92 | | - |
93 | 51 | (def plan-and-execute |
94 | 52 | {:name "plan-and-execute" |
95 | 53 | :description "Use the scratch pad tool to plan and execute an change" |
|
0 commit comments