On this page:
define-simple-macro

1.6 Defining Simple Macros

 (require syntax/parse/define) package: base

syntax

(define-simple-macro (macro-id . pattern) pattern-directive ...
  template)
Defines a macro named macro-id; equivalent to the following:

(define-syntax (macro-id stx)
  (syntax-parse stx
    [(macro-id . pattern) pattern-directive ... #'template]))

Examples:

> (define-simple-macro (fn x:id rhs:expr) (lambda (x) rhs))
> ((fn x x) 17)

17

> (fn 1 2)

fn: expected identifier at: 1

> (define-simple-macro (fn2 x y rhs)
    #:declare x id
    #:declare y id
    #:declare rhs expr
    (lambda (x y) rhs))
> ((fn2 a b (+ a b)) 3 4)

7

> (fn2 a #:b 'c)

fn2: expected identifier at: #:b