ref: 0e91e3f7753eb9a0f3f7fe758c6d94690ef86000
dir: /zuo-doc/fake-zuo.rkt/
#lang racket/base (define-syntax-rule (define-fake id ...) (begin (provide id ...) (define id 'id) ...)) (define-syntax-rule (intro-define-fake) (define-fake lambda let let* letrec if and or when unless begin cond quote quasiquote unquote unquote-splicing quote-syntax define define-syntax include require provide module+ quote-module-path pair? null? integer? string? symbol? hash? list? procedure? path-string? module-path? relative-path? handle? boolean? void apply call/cc call/prompt continuation-prompt-available? context-consumer context-consumer? cons car cdr list append reverse length member assoc remove list-ref list-set andmap ormap map filter foldl for-each not eq? equal? void? + - * quotient modulo < <= = >= > bitwise-and bitwise-ior bitwise-xor bitwise-not string-length string-ref string-u32-ref substring string=? string-ci=? string->symbol string->uninterned-symbol symbol->string string string-sha256 char string-split string-join string-trim string-tree? hash hash-ref ref hash-set hash-remove hash-keys hash-count hash-keys-subset? opaque opaque-ref build-path split-path at-source variable? variable variable-ref variable-set! identifier? syntax-e syntax->datum datum->syntax bound-identifier=? syntax-error bad-syntax misplaced-syntax duplicate-identifier fd-open-input fd-open-output fd-close fd-read fd-write fd-poll eof fd-terminal? file->string display-to-file stat ls rm mv mkdir rmdir symlink readlink cp current-time system-type file-exists? directory-exists? link-exists? explode-path simple-form-path find-relative-path build-raw-path path-replace-extension path-only file-name-from-path path->complete-path ls* rm* cp* mkdir-p :error :truncate :must-truncate :append :update :can-update cleanable-file cleanable-cancel process process-status process-wait find-executable-path shell->strings string->shell error alert ~v ~a ~s arity-error arg-error display displayln string-read module->hash build-module-path kernel-env kernel-eval dynamic-require runtime-env dump-image-and-exit exit suspend-signal resume-signal command-line target rule phony-rule input-file-target input-data-target target-path target-name target? token? rule? phony-rule? sha256? file-sha256 no-sha256 sha256-length build build/command-line build/command-line* build/dep build/no-dep provide-targets find-target make-at-dir make-targets command-target? command-target->target bounce-to-targets shell shell/wait build-shell call-in-main-thread thread? thread channel? channel channel-put channel-get channel-try-get thread-process-wait config-file->hash maybe-jobserver-client maybe-jobserver-jobs)) (intro-define-fake)