samdphillips

#lang racket/base

(require (for-syntax racket/base
                     syntax/parse)
         racket/stxparam

         (only-in racket/format ~r)
         (only-in racket/port
                  call-with-input-bytes
                  call-with-input-string

samdphillips

Python allows a codec directive at the start of a file which allows for a hook to rewrite the content.

Here are some uses I've found of this in the wild using this github query.

• python-parsing-shenanigans - basic demonstration of the technique
• InlineC
• Pyxl4 - Embedding HTML in python
• Tilde - Supporting pattern matching
• future-fstrings - a package for supporting fstrings in older versions of Python 3.
• pythonql - embedding a LINQ like query language in Python
• dansk.py - translate Python keywords to Danish

samdphillips

#lang racket

(define-logger workin)

(struct queue (fore aft))

(define (enqueue q w)
  (match q
    [(queue a d) (queue a (cons w d))]))

samdphillips

#lang rhombus/static/and_meta

import:
  lib("racket/stream.rkt")

export:
  Stream

meta:
  namespace Stream:

samdphillips

#lang racket/base

(require mzlib/thread
         racket/match
         racket/port
         racket/string
         "mcast-channel.rkt")

(define-logger chat-server)

samdphillips

#lang racket/base

;; uses https://github.com/samdphillips/racket-syncvar

(require racket/contract
         racket/match
         "ivar.rkt")

(provide mcast-channel?
         mcast-output?

samdphillips

#lang racket/base

(require racket/exn
         racket/set
         "util.rkt")

(provide supervise)

(define-logger supervise)

samdphillips

#lang rhombus

import:
  racket/base
  racket/math:
    expose:
      pi

operator (m ** n):
  ~stronger_than: *

samdphillips

#lang cmark-scribble

# This is a test document

1 + 1 is **@+[1 1]**

samdphillips

#!/usr/bin/env racket
#lang rkshell

(require racket/date
         "service.rkt"
         "ssh.rkt")

(define-logger deploy)

(date-display-format 'iso-8601)