From c1cc8557e84382cbe7f37d72bcb7bc957a973224 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Wed, 24 Apr 2019 21:45:56 -0700 Subject: [PATCH] make arg names consistent --- beautiful-racket-demo/basic-demo-2/main.rkt | 2 +- beautiful-racket-demo/basic-demo-3/main.rkt | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/beautiful-racket-demo/basic-demo-2/main.rkt b/beautiful-racket-demo/basic-demo-2/main.rkt index 53b43e8..128eb9c 100644 --- a/beautiful-racket-demo/basic-demo-2/main.rkt +++ b/beautiful-racket-demo/basic-demo-2/main.rkt @@ -10,7 +10,7 @@ #`(module basic-mod basic-demo-2/expander #,parse-tree))) -(define (get-info port mod line col pos) +(define (get-info port src-mod src-line src-col src-pos) (define (handle-query key default) (case key [(color-lexer) diff --git a/beautiful-racket-demo/basic-demo-3/main.rkt b/beautiful-racket-demo/basic-demo-3/main.rkt index 2de9b5b..7c3fcd1 100644 --- a/beautiful-racket-demo/basic-demo-3/main.rkt +++ b/beautiful-racket-demo/basic-demo-3/main.rkt @@ -10,7 +10,7 @@ #`(module basic-mod basic-demo-3/expander #,parse-tree))) -(define (get-info port mod line col pos) +(define (get-info port src-mod src-line src-col src-pos (define (handle-query key default) (case key [(color-lexer)