suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix typos in comments

Browse Source
This commit is contained in:
Fred Fu 2020-08-06 16:57:58 -04:00 committed by Matthew Flatt
parent 581f02d6f8
commit e4dc27a2b8
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
racket/src/bc/src/longdouble/longdouble.c
View File

@ -916,7 +916,7 @@ END_XFORM_SKIP;
/* Like regular glue mode, but only for the string operations. /* Like regular glue mode, but only for the string operations.
It may seem strage to resort to a MinGW-compiled DLL to implement It may seem strange to resort to a MinGW-compiled DLL to implement
functionality when compiling with MinGW, but the MinGW version has functionality when compiling with MinGW, but the MinGW version has
to be recent enough to get __mingw_sscanf, so we do things this to be recent enough to get __mingw_sscanf, so we do things this
way to allow building with older MinGWs (such as the default MinGW way to allow building with older MinGWs (such as the default MinGW

2
racket/src/expander/eval/top.rkt
View File

@ -68,7 +68,7 @@
(hash-ref (linklet-bundle->hash (hash-ref (linklet-directory->hash data-ld) #f)) 0) (hash-ref (linklet-bundle->hash (hash-ref (linklet-directory->hash data-ld) #f)) 0)
ns)))] ns)))]
[else [else
;; No shared data? Strage, but we can carry on, anyway: ;; No shared data? Strange, but we can carry on, anyway:
(eval-compiled-parts (compiled-top->compiled-tops c))])) (eval-compiled-parts (compiled-top->compiled-tops c))]))
(define (eval-one-top c ns [as-tail? #t] (define (eval-one-top c ns [as-tail? #t]