diff --git a/collects/2htdp/tests/image-equality-performance-htdp.rkt b/collects/2htdp/tests/image-equality-performance-htdp.rkt index 547c0c9286..cf04ed3989 100644 --- a/collects/2htdp/tests/image-equality-performance-htdp.rkt +++ b/collects/2htdp/tests/image-equality-performance-htdp.rkt @@ -411,7 +411,7 @@ Also added the timing code at the end. ;;purpose :given the board ,square to be played,column and row label and returns a new board -;;with the square to be played at the position reffered +;;with the square to be played at the position referred ;; play-on-board : board square symbol symbol -> board ;;test diff --git a/collects/2htdp/tests/image-equality-performance.rkt b/collects/2htdp/tests/image-equality-performance.rkt index 1c76b51030..19808deed0 100644 --- a/collects/2htdp/tests/image-equality-performance.rkt +++ b/collects/2htdp/tests/image-equality-performance.rkt @@ -416,7 +416,7 @@ Also added the timing code at the end. ;;purpose :given the board ,square to be played,column and row label and returns a new board -;;with the square to be played at the position reffered +;;with the square to be played at the position referred ;; play-on-board : board square symbol symbol -> board ;;test diff --git a/collects/compiler/private/vmphase.rkt b/collects/compiler/private/vmphase.rkt index 8bf7fc7324..acbeb71a80 100644 --- a/collects/compiler/private/vmphase.rkt +++ b/collects/compiler/private/vmphase.rkt @@ -803,7 +803,7 @@ ;; distinguish between tail & non-tail calls ;; implement tail calls to "simple" primitives a regular calls ;; no need to pass anything to tail here because it's already - ;; a tail value if its a tail-apply + ;; a tail value if it's a tail-apply ;; the vm-optimizer will refine the multi-ness of this application, ;; and worry about inter & intra-vehicle calls ;; diff --git a/collects/embedded-gui/doc.txt b/collects/embedded-gui/doc.txt index f528ab78b6..09ff60afa1 100644 --- a/collects/embedded-gui/doc.txt +++ b/collects/embedded-gui/doc.txt @@ -257,7 +257,7 @@ alignment<%>. _stretchable-editor-snip-mixin_ gives an editor snip the _stretchable-snip<%>_ interface allowing it to be stretched -to fit it's alignment-parent<%>'s alloted width. Stretchable +to fit its alignment-parent<%>'s alloted width. Stretchable snips are useful as the snip of a snip-wrapper%. _stretchable-editor-snip%_ is (stretcable-editor-snip-mixin editor-snip%) diff --git a/collects/embedded-gui/scribblings/embedded-gui.scrbl b/collects/embedded-gui/scribblings/embedded-gui.scrbl index 2d5bd51a5e..e8c937fe7f 100644 --- a/collects/embedded-gui/scribblings/embedded-gui.scrbl +++ b/collects/embedded-gui/scribblings/embedded-gui.scrbl @@ -81,7 +81,7 @@ t hat are labeled from a particular set of strings.} Sets the tabbing order of @scheme[tabbable-text<%>]s by setting each text's @method[tabbable-text<%> set-ahead] and -@method[tabbable-text<%> set-back] thunks to point to it's neighbor in +@method[tabbable-text<%> set-back] thunks to point to its neighbor in the argument list.} diff --git a/collects/framework/main.rkt b/collects/framework/main.rkt index 85c921a59c..82b15b12dd 100644 --- a/collects/framework/main.rkt +++ b/collects/framework/main.rkt @@ -802,7 +802,7 @@ @scheme[filename]. @itemize[ @item{If a handler is found, it is applied to - @scheme[filename] and it's result is the final + @scheme[filename] and its result is the final result.} @item{If not, @scheme[make-default] is used.}]}]} @item{If @scheme[filename] is @scheme[#f], @scheme[make-default] is diff --git a/collects/framework/private/scheme.rkt b/collects/framework/private/scheme.rkt index be69a203af..6bf517c16c 100644 --- a/collects/framework/private/scheme.rkt +++ b/collects/framework/private/scheme.rkt @@ -604,7 +604,7 @@ [(not contains) ;; Something went wrong matching. Should we get here? (do-indent 0)] - #; ;; disable this to accomodate PLAI programs; return to this when a #lang capability is set up. + #; ;; disable this to accommodate PLAI programs; return to this when a #lang capability is set up. [(curley-brace-sexp?) ;; when we are directly inside an sexp that uses {}s, ;; we indent in a more C-like fashion (to help Scribble) diff --git a/collects/frtime/doc.txt b/collects/frtime/doc.txt index 30fb635df5..452a9256e1 100644 --- a/collects/frtime/doc.txt +++ b/collects/frtime/doc.txt @@ -278,7 +278,7 @@ Generates a mixin that sends an event on stream-name when callback is called. The class has an init field called [stream-name]-event-processor, which is a function. The function is applied to an event stream that has an -occurence every time callback is called, and the value +occurrence every time callback is called, and the value of the events is a list of the arguments to the callback. The public method (get-[stream-name]) is a public method of the resulting class that gets the result of applying diff --git a/collects/frtime/gui/doc.txt b/collects/frtime/gui/doc.txt index 4d5c3a246b..568ee054d9 100644 --- a/collects/frtime/gui/doc.txt +++ b/collects/frtime/gui/doc.txt @@ -32,7 +32,7 @@ when the event should just be the value of the first argument of the callback. split-*-events/type sets up an appropriate split (see FrTime docs for split information, GRacket docs for key-event codes and mouse-event types) over -the type of event occurence. +the type of event occurrence. events->callbacks and callbacks->args-evts are the backbone diff --git a/collects/honu/core/private/honu.rkt b/collects/honu/core/private/honu.rkt index 2661df35a6..ff0b705ce5 100644 --- a/collects/honu/core/private/honu.rkt +++ b/collects/honu/core/private/honu.rkt @@ -1026,7 +1026,7 @@ (if (eq? #t (syntax-e #'type-name)) ;; Context guarantees correct use, as long as we report our type: #'(honu-report-type val orig-expr val-type protect-id) - ;; Context gurantees use at a particular type... + ;; Context guarantees use at a particular type... (if (check-compatible-type #'val #'orig-expr #'val-type #'type-name type-mismatch) ;; Declared type subsumes actual type: (if (and (syntax-e #'protect-id) diff --git a/collects/htdp/tests/guess-gui.rkt b/collects/htdp/tests/guess-gui.rkt index f1c9d82576..68feb1c9c7 100644 --- a/collects/htdp/tests/guess-gui.rkt +++ b/collects/htdp/tests/guess-gui.rkt @@ -11,7 +11,7 @@ ;; convert : (listof DIGIT) -> number ;; to convert a list of digits into a number -;; the leading digit is the least signifcant one +;; the leading digit is the least significant one (define (convert alod) (cond [(empty? alod) 0] diff --git a/collects/lazy/force.rkt b/collects/lazy/force.rkt index 06280dca71..d89f336266 100644 --- a/collects/lazy/force.rkt +++ b/collects/lazy/force.rkt @@ -9,7 +9,7 @@ (define ~? promise?) ;; force a top-level list structure; works with improper lists (will force the -;; dotted item when it checks if its a pair); does not handle cycles +;; dotted item when it checks if it's a pair); does not handle cycles (define (!list x) (let ([x (! x)]) (if (list? x) ; cheap check, diff --git a/collects/mred/private/wx/cocoa/gauge.rkt b/collects/mred/private/wx/cocoa/gauge.rkt index 153b821b18..caab798559 100644 --- a/collects/mred/private/wx/cocoa/gauge.rkt +++ b/collects/mred/private/wx/cocoa/gauge.rkt @@ -33,7 +33,7 @@ (super-new [parent parent] [cocoa (let ([cocoa (as-objc-allocation ;; Beware that a guage may be finally deallocated in - ;; a seperate OS-level thread + ;; a separate OS-level thread (tell (tell MyProgressIndicator alloc) init))]) (tellv cocoa setIndeterminate: #:type _BOOL #f) (tellv cocoa setMaxValue: #:type _double* rng) diff --git a/collects/mred/private/wx/gtk/frame.rkt b/collects/mred/private/wx/gtk/frame.rkt index 8c43cf8e9e..7db96daf3b 100644 --- a/collects/mred/private/wx/gtk/frame.rkt +++ b/collects/mred/private/wx/gtk/frame.rkt @@ -216,7 +216,7 @@ (adjust-client-delta 0 h)) ;; Hack: calls back into the mred layer to re-compute ;; sizes. By calling this early enough, the frame won't - ;; grow if it doesn't have to grow to accomodate the menu bar. + ;; grow if it doesn't have to grow to accommodate the menu bar. (send this resized)) (define saved-enforcements (vector 0 0 -1 -1)) diff --git a/collects/mred/private/wx/win32/gl-context.rkt b/collects/mred/private/wx/win32/gl-context.rkt index 3da5c6e3f1..f7b8f0ce08 100644 --- a/collects/mred/private/wx/win32/gl-context.rkt +++ b/collects/mred/private/wx/win32/gl-context.rkt @@ -137,7 +137,7 @@ PFD_SUPPORT_GDI) (bitwise-ior PFD_DRAW_TO_WINDOW))) PFD_TYPE_RGBA ; color type - (if offscreen? 32 24) ; prefered color depth + (if offscreen? 32 24) ; preferred color depth 0 0 0 0 0 0 ; color bits (ignored) 0 ; no alpha buffer 0 ; alpha bits (ignored) diff --git a/collects/mred/private/wxme/editor-snip.rkt b/collects/mred/private/wxme/editor-snip.rkt index 14f573695b..0d715396a7 100644 --- a/collects/mred/private/wxme/editor-snip.rkt +++ b/collects/mred/private/wxme/editor-snip.rkt @@ -111,7 +111,7 @@ (when (and s-admin (has-flag? s-flags USES-BUFFER-PATH)) - ;; propogate a filename change: + ;; propagate a filename change: (if (and editor (no-permanent-filename? editor)) (let ([b (send s-admin get-editor)]) diff --git a/collects/mred/private/wxme/mline.rkt b/collects/mred/private/wxme/mline.rkt index 6d81eac8d0..0794bb893f 100644 --- a/collects/mred/private/wxme/mline.rkt +++ b/collects/mred/private/wxme/mline.rkt @@ -1039,7 +1039,7 @@ Debugging tools: [next (mline-next mline)]) (when (or (not (eq? (mline-snip next) asnip)) (not (has-flag? (snip->flags (mline-last-snip next)) NEWLINE))) - ;; Effect can propogate to more lines, merging the + ;; Effect can propagate to more lines, merging the ;; next several. (Handle prefixing the remains of the source of ;; the extension to this line onto the next line. Implemented ;; as the next line eating the next->next line.) diff --git a/collects/mrlib/image-core.rkt b/collects/mrlib/image-core.rkt index 3cbd78905d..8df14e75b3 100644 --- a/collects/mrlib/image-core.rkt +++ b/collects/mrlib/image-core.rkt @@ -255,7 +255,7 @@ has been moved out). (or (and (not (skip-image-equality-fast-path)) ;; this is here to make testing more effective (equal? (get-normalized-shape) (send that get-normalized-shape))) (let ([w (+ 1 (round (inexact->exact (bb-right bb))))] ;; some shapes (ie, rectangles) draw 1 outside the bounding box - [h (+ 1 (round (inexact->exact (bb-bottom bb))))]) ;; so we make the bitmap slightly bigger to accomodate that. + [h (+ 1 (round (inexact->exact (bb-bottom bb))))]) ;; so we make the bitmap slightly bigger to accommodate that. (or ;(zero? w) ;(zero? h) (let ([bm1 (make-bitmap w h #t)] diff --git a/collects/mrlib/private/aligned-pasteboard/geometry-managed-pasteboard.rkt b/collects/mrlib/private/aligned-pasteboard/geometry-managed-pasteboard.rkt index 9d5e2abe5c..2773b2e794 100644 --- a/collects/mrlib/private/aligned-pasteboard/geometry-managed-pasteboard.rkt +++ b/collects/mrlib/private/aligned-pasteboard/geometry-managed-pasteboard.rkt @@ -50,7 +50,7 @@ (get-aligned-min-sizes type (find-first-snip))))) ;; set-algined-min-sizes (-> void?) - ;; set the aligned min width and height of the pasteboard based on it's children snips + ;; set the aligned min width and height of the pasteboard based on its children snips (inherit in-edit-sequence?) (define/public (aligned-min-sizes-invalid) ;; This in-edit-sequence? is not sound. It causes me to percollate invalidation diff --git a/collects/mrlib/private/image-core-bitmap.rkt b/collects/mrlib/private/image-core-bitmap.rkt index 9b694af253..6a56a7f096 100644 --- a/collects/mrlib/private/image-core-bitmap.rkt +++ b/collects/mrlib/private/image-core-bitmap.rkt @@ -27,7 +27,7 @@ instead of this scaling code, we use the dc<%>'s scaling code. ; bmbytes: a bytes which represents an image -- -; it's size is a multiple of 4, and each +; its size is a multiple of 4, and each ; four consecutive bytes represent alpha,r,g,b. diff --git a/collects/mzlib/kw.rkt b/collects/mzlib/kw.rkt index 66456276c1..014f5969dd 100644 --- a/collects/mzlib/kw.rkt +++ b/collects/mzlib/kw.rkt @@ -128,7 +128,7 @@ [else (ormap (lambda (k) (and (assq k rests) #t)) ; suggested? (car (cddddr processed-spec)))]))) (define (make-keyword-get-expr key rest default known-vars) - ;; expand (for id macros) and check if its a simple expression, because if + ;; expand (for id macros) and check if it's a simple expression, because if ;; it is, evaluation cannot have side-effects and we can use keyword-get* (define default* (local-expand default 'expression (cons #'#%app known-vars))) diff --git a/collects/mzlib/thread.rkt b/collects/mzlib/thread.rkt index 4c4d00585a..c4bcf7a798 100644 --- a/collects/mzlib/thread.rkt +++ b/collects/mzlib/thread.rkt @@ -7,7 +7,7 @@ #| t accepts a function, f, and creates a thread. It returns the thread and a - function, g. When g is applied it passes it's argument to f, and evaluates + function, g. When g is applied it passes its argument to f, and evaluates the call of f in the time of the thread that was created. Calls to g do not block. |# diff --git a/collects/mzscheme/examples/README b/collects/mzscheme/examples/README index ee128c7580..a90d33a2da 100644 --- a/collects/mzscheme/examples/README +++ b/collects/mzscheme/examples/README @@ -28,7 +28,7 @@ end use the mzc `c-lambda', etc. forms. exceptions while evaluating a string. Demonstrates how to catch exceptions from C code. - * bitmatrix.c - implements two-dimentional bit matrixes with some + * bitmatrix.c - implements two-dimensional bit matrixes with some operations. Demonstrates defining a new Scheme data type, data allocation, fancy integer type checking, general exception raising, and registering static variables. Also demonstrates supplying diff --git a/collects/openssl/mzssl.rkt b/collects/openssl/mzssl.rkt index d2ec22b506..6bfca6e48a 100644 --- a/collects/openssl/mzssl.rkt +++ b/collects/openssl/mzssl.rkt @@ -185,7 +185,7 @@ (define-mzscheme scheme_end_atomic (-> _void)) (define-mzscheme scheme_make_custodian (_pointer -> _scheme)) - ;; Make this bigger than 4096 to accomodate at least + ;; Make this bigger than 4096 to accommodate at least ;; 4096 of unencrypted data (define BUFFER-SIZE 8000) diff --git a/collects/parser-tools/lex.rkt b/collects/parser-tools/lex.rkt index e9983ab962..2db2ecbb8f 100644 --- a/collects/parser-tools/lex.rkt +++ b/collects/parser-tools/lex.rkt @@ -252,7 +252,7 @@ ;; including a match at the current state (longest-match-action (vector-ref actions start-state)) - ;; how many bytes preceed char + ;; how many bytes precede char (length-bytes 0) ;; how many characters have been read ;; including the one just read diff --git a/collects/parser-tools/private-yacc/grammar.rkt b/collects/parser-tools/private-yacc/grammar.rkt index dd71a88fbd..fe20c5a361 100644 --- a/collects/parser-tools/private-yacc/grammar.rkt +++ b/collects/parser-tools/private-yacc/grammar.rkt @@ -12,7 +12,7 @@ (define-struct prod (lhs rhs index prec action) (make-inspector)) ;; The dot-pos field is the index of the element in the rhs - ;; of prod that the dot immediately preceeds. + ;; of prod that the dot immediately precedes. ;; Thus 0 <= dot-pos <= (vector-length rhs). (define-struct item (prod dot-pos) (make-inspector)) diff --git a/collects/planet/private/short-syntax-helpers.rkt b/collects/planet/private/short-syntax-helpers.rkt index df517cca4f..10c7808c9d 100644 --- a/collects/planet/private/short-syntax-helpers.rkt +++ b/collects/planet/private/short-syntax-helpers.rkt @@ -38,7 +38,7 @@ ;; parse-package : string (string -> 'a) -> (values string nat min-spec) ;; given a package specifier, returns the package name, the package major version, and a descriptor -;; for the acceptible minor versions +;; for the acceptable minor versions (define (parse-package package yell) (try-parsing package ([pkgname (get-to-next-colon-or-end)] diff --git a/collects/plot/fit.rkt b/collects/plot/fit.rkt index a3b388a7a1..437c8eab22 100644 --- a/collects/plot/fit.rkt +++ b/collects/plot/fit.rkt @@ -15,24 +15,24 @@ ; fit-int : (number* -> number) (list-of (symbol number)) (list-of (vector number [number] number number)) -> fit-result (define (fit-int function guesses data) - (let* ((independant-vars (- (procedure-arity function) (length guesses))) + (let* ((independent-vars (- (procedure-arity function) (length guesses))) (f-of-x-y (cond - [(= 1 independant-vars) + [(= 1 independent-vars) (lambda (x y . rest) (apply function x rest))] - [(= 2 independant-vars) + [(= 2 independent-vars) function] [else - (error "Function provided is eitehr not of one or two independant variables or the number of + (error "Function provided is either not of one or two independent variables or the number of guesses given is incorrect")])) (x-vals (map vector-x data)) - (y-vals (if (= 1 independant-vars) + (y-vals (if (= 1 independent-vars) x-vals (map vector-y data))) - (z-vals (if (= 1 independant-vars) + (z-vals (if (= 1 independent-vars) (map vector-y data) (map vector-z data))) - (err-vals (if (= 1 independant-vars) + (err-vals (if (= 1 independent-vars) (map vector-z data) (map (lambda (vec) (vector-ref vec 4)) data))) (result (fit-internal f-of-x-y x-vals y-vals z-vals err-vals (map cadr guesses)))) diff --git a/collects/plot/math.rkt b/collects/plot/math.rkt index 7019ce2826..a8ef955d88 100644 --- a/collects/plot/math.rkt +++ b/collects/plot/math.rkt @@ -4,7 +4,7 @@ (require mzlib/list mzlib/etc mzlib/math) - ; using vectors for n-dimentional points + ; using vectors for n-dimensional points ; vector-magnitude : (vectorof number) -> number ; computes the magnituded of the vector by using pythegorean theorem diff --git a/collects/plot/plot.rkt b/collects/plot/plot.rkt index 49ae2dd88a..87250389bf 100644 --- a/collects/plot/plot.rkt +++ b/collects/plot/plot.rkt @@ -36,7 +36,7 @@ ;; make-2d-renderer : (2d-view% -> void) ;; provides a user with the ability to create their own renderers -;; without providing the implimentation +;; without providing the implementation (define custom identity) ;; diff --git a/collects/racket/private/serialize.rkt b/collects/racket/private/serialize.rkt index b2d90f853e..bd632a18b7 100644 --- a/collects/racket/private/serialize.rkt +++ b/collects/racket/private/serialize.rkt @@ -415,7 +415,7 @@ (define (lookup-shared! share n mod-map module-path-index-join) ;; The shared list is not necessarily in order of - ;; refereds before referees. A `not-ready' object + ;; referreds before referees. A `not-ready' object ;; indicates a reference before a value is ready, ;; so we need to recur to make it ready. Cycles ;; have been broken, though, so we don't run into diff --git a/collects/redex/redex.scrbl b/collects/redex/redex.scrbl index 27c0792a82..53b6ca4d2b 100644 --- a/collects/redex/redex.scrbl +++ b/collects/redex/redex.scrbl @@ -2438,7 +2438,7 @@ The line, line-span, column, and column-span correspond to the logical spacing for the redex program, not the actual spacing that will be used when they are rendered. The logical spacing is only used when determining where to place -typeset portions of the program. In the absense of any +typeset portions of the program. In the absence of any rewriters, these numbers correspond to the line and column numbers in the original program. diff --git a/collects/scribblings/framework/canvas.scrbl b/collects/scribblings/framework/canvas.scrbl index ec1cc5c3a0..af73ef2bfa 100644 --- a/collects/scribblings/framework/canvas.scrbl +++ b/collects/scribblings/framework/canvas.scrbl @@ -53,7 +53,7 @@ Any @scheme[canvas%] that matches this interface will automatically - resize selected snips when it's size changes. Use + resize selected snips when its size changes. Use @method[canvas:wide-snip<%> add-tall-snip] and @method[canvas:wide-snip<%> add-wide-snip] diff --git a/collects/scribblings/framework/editor.scrbl b/collects/scribblings/framework/editor.scrbl index 64a353be79..b683634f0a 100644 --- a/collects/scribblings/framework/editor.scrbl +++ b/collects/scribblings/framework/editor.scrbl @@ -346,7 +346,7 @@ the filesystem. The class that this mixin produces uses the same initialization - arguments as it's input. + arguments as its input. @defmethod*[#:mode override (((set-filename (name string) (temp? boolean |#f|)) void))]{ Updates the filename on each frame displaying this editor, for each diff --git a/collects/scribblings/framework/text.scrbl b/collects/scribblings/framework/text.scrbl index 7aa92bce03..09188b9b3c 100644 --- a/collects/scribblings/framework/text.scrbl +++ b/collects/scribblings/framework/text.scrbl @@ -156,7 +156,7 @@ objects in the framework. The class that this mixin produces uses the same initialization - arguments as it's input. + arguments as its input. @defmethod*[#:mode override (((on-paint (before? any/c) (dc (is-a?/c dc<%>)) (left real?) (top real?) (right real?) (bottom real?) (dx real?) (dy real?) (draw-caret (one-of/c (quote no-caret) (quote show-inactive-caret) (quote show-caret)))) void))]{ Draws the rectangles installed by diff --git a/collects/scribblings/guide/simple-syntax.scrbl b/collects/scribblings/guide/simple-syntax.scrbl index 8f4578b35b..83748241c9 100644 --- a/collects/scribblings/guide/simple-syntax.scrbl +++ b/collects/scribblings/guide/simple-syntax.scrbl @@ -379,7 +379,7 @@ clearly written as follows: The use of square brackets for @racket[cond] clauses is a convention. In Racket, parentheses and square brackets are actually -interchangable, as long as @litchar{(} is matched with @litchar{)} and +interchangeable, as long as @litchar{(} is matched with @litchar{)} and @litchar{[} is matched with @litchar{]}. Using square brackets in a few key places makes Racket code even more readable. diff --git a/collects/scribblings/raco/exe-api.scrbl b/collects/scribblings/raco/exe-api.scrbl index 6085885dda..25323d77cf 100644 --- a/collects/scribblings/raco/exe-api.scrbl +++ b/collects/scribblings/raco/exe-api.scrbl @@ -256,7 +256,7 @@ currently supported keys are as follows: @racket[#t] means that, to the degree that the generated executable must refer to another, it can use a relative path (so the executables can be moved together, but not - seperately); a @racket[#f] value (the default) means that + separately); a @racket[#f] value (the default) means that absolute paths should be used (so the generated executable can be moved).} diff --git a/collects/scribblings/reference/contracts.scrbl b/collects/scribblings/reference/contracts.scrbl index e906df1dc3..7caa081896 100644 --- a/collects/scribblings/reference/contracts.scrbl +++ b/collects/scribblings/reference/contracts.scrbl @@ -1088,8 +1088,8 @@ on integers looks like this: Although these projections have the right error behavior, they are not quite ready for use as contracts, because they -do not accomodate blame, and do not provide good error -messages. In order to accomodate these, contracts do not +do not accommodate blame, and do not provide good error +messages. In order to accommodate these, contracts do not just use simple projections, but use functions that accept a @deftech{blame object} encapsulating the names of two parties that are the candidates for blame, diff --git a/collects/scribblings/reference/control-lib.scrbl b/collects/scribblings/reference/control-lib.scrbl index ed46da84cc..c748d289c4 100644 --- a/collects/scribblings/reference/control-lib.scrbl +++ b/collects/scribblings/reference/control-lib.scrbl @@ -173,7 +173,7 @@ The essential reduction rules are: (lambda (_v) (reset0 _E[_v]))) ] -The @scheme[reset0] and @scheme[prompt0] forms are interchangable. +The @scheme[reset0] and @scheme[prompt0] forms are interchangeable. Furthermore, the following reductions apply: @schemeblock[ diff --git a/collects/scribblings/reference/networking.scrbl b/collects/scribblings/reference/networking.scrbl index a0285c74fe..ffae05cbde 100644 --- a/collects/scribblings/reference/networking.scrbl +++ b/collects/scribblings/reference/networking.scrbl @@ -45,7 +45,7 @@ accepts only connections to @racket["127.0.0.1"] (the loopback interface) from the local machine. (Racket implements a listener with multiple sockets, if necessary, to -accomodate multiple addresses with different protocol families. Under +accommodate multiple addresses with different protocol families. Under Linux, if @racket[hostname] maps to both IPv4 and IPv6 addresses, then the behavior depends on whether IPv6 is supported and IPv6 sockets can be configured to listen to only IPv6 connections: if IPv6 is not diff --git a/collects/scribblings/reference/reader.scrbl b/collects/scribblings/reference/reader.scrbl index dbdf6a4d37..87a132fba0 100644 --- a/collects/scribblings/reference/reader.scrbl +++ b/collects/scribblings/reference/reader.scrbl @@ -322,7 +322,7 @@ the recursive reads. If the reader finds two data between the matching parentheses that are separated by a delimited @litchar{.}, then it creates a pair. More generally, if it finds two or more data where the -last is preceeded by a delimited @litchar{.}, then it constructs +last is preceded by a delimited @litchar{.}, then it constructs nested pairs: the next-to-last element is paired with the last, then the third-to-last is paired with that pair, and so on. diff --git a/collects/scribblings/tools/rep.scrbl b/collects/scribblings/tools/rep.scrbl index 86f8dcaae9..bc07584f18 100644 --- a/collects/scribblings/tools/rep.scrbl +++ b/collects/scribblings/tools/rep.scrbl @@ -60,9 +60,9 @@ submitted at the prompt. @methimpl{ The function @scheme[run-loop] is called. It is expected to loop, calling -it's argument with a thunk that corresponds to the user's -evaluation. It should call it's argument once for each expression the -user is evaluating. It should pass a thunk to it's argument that +its argument with a thunk that corresponds to the user's +evaluation. It should call its argument once for each expression the +user is evaluating. It should pass a thunk to its argument that actually does the users's evaluation. @@ -297,7 +297,7 @@ This method resets the highlighting being displayed for this repl. See also: void?]{ @methspec{ -This function runs it's arguments in the user evaluation thread. This +This function runs its arguments in the user evaluation thread. This thread is the same as the user's eventspace main thread. See also @@ -369,7 +369,7 @@ interactions windows.} @definterface[drracket:rep:context<%> ()]{ Objects that match this interface provide all of the services that the -@scheme[drracket:rep:text%] class needs to connect with it's context. +@scheme[drracket:rep:text%] class needs to connect with its context. diff --git a/collects/scribblings/tools/tools.scrbl b/collects/scribblings/tools/tools.scrbl index c3bb91b7d3..79a91424aa 100644 --- a/collects/scribblings/tools/tools.scrbl +++ b/collects/scribblings/tools/tools.scrbl @@ -472,7 +472,7 @@ is bound to an extender function. In order to change the behavior of DrRacket, you can derive new classes from the standard classes for the frame, texts, canvases. Each extender accepts a function as input. The function it -accepts must take a class as it's argument and return a +accepts must take a class as its argument and return a classes derived from that class as its result. For example: @racketblock[ diff --git a/collects/sirmail/readr.rkt b/collects/sirmail/readr.rkt index 93919ecd52..81872e23f6 100644 --- a/collects/sirmail/readr.rkt +++ b/collects/sirmail/readr.rkt @@ -2010,7 +2010,7 @@ (sleep 10) (loop))))))) - ;; copied from framerok/private/frame.sss -- be sure to propogate fixes.... + ;; copied from framerok/private/frame.sss -- be sure to propagate fixes.... ;; or establish single point of control. (define (format-number n) (if n diff --git a/collects/srfi/26/cut.rkt b/collects/srfi/26/cut.rkt index 762f367d06..16f344d16f 100644 --- a/collects/srfi/26/cut.rkt +++ b/collects/srfi/26/cut.rkt @@ -16,7 +16,7 @@ ; Given the arguments for the macro call to cut (or cute) as a syntax-list, ; call build with four lists: ; 1) a list of names given to each <>-slot -; 2) [cut] a list of the macro arguments, except that all occurences +; 2) [cut] a list of the macro arguments, except that all occurrences ; of a <>-slots have been substituted with the chosen name. ; 3) [cute] a list the names given to the exprs and the <>-slots ; 4) [cute] a list of lists of name-expression pairs, i.e. the bindings diff --git a/collects/srfi/optional.rkt b/collects/srfi/optional.rkt index 44e9078d7b..16af7a4ede 100644 --- a/collects/srfi/optional.rkt +++ b/collects/srfi/optional.rkt @@ -1,6 +1,6 @@ ;;; ;;; ---- Let-optionals macros -;;; Time-stamp: <02/07/15 09:25:27 solsona> +;;; Time-stamp: <2011-02-02 11:44:21 dvanhorn> ;;; ;;; Usually, I would add a copyright notice, and the announce that ;;; this code is under the LGPL licence. This code is been copied @@ -39,7 +39,7 @@ ;; ;; Commentary: ;; -;; this is a port of commonly refered (in SRFI mostly) macros, and +;; this is a port of commonly referred (in SRFI mostly) macros, and ;; utilities, to the PLT Scheme system. I'm not sure if I should use ;; the word "port", because I hardly touched Olin Shivers' superiour ;; macros. :-) diff --git a/collects/srpersist/doc.txt b/collects/srpersist/doc.txt index 2262db0df4..d703360da5 100644 --- a/collects/srpersist/doc.txt +++ b/collects/srpersist/doc.txt @@ -1561,7 +1561,7 @@ 'sql-param-success-with-info 'sql-param-error 'sql-param-unused - 'sql-param-diag-unavilable + 'sql-param-diag-unavailable > (get-stmt-option hstmt option) diff --git a/collects/stepper/private/lifting.rkt b/collects/stepper/private/lifting.rkt index 2094fdf565..4e01615766 100644 --- a/collects/stepper/private/lifting.rkt +++ b/collects/stepper/private/lifting.rkt @@ -262,7 +262,7 @@ (loop (cdr ctx-list) next-defs next-body)))))) ; lift-helper takes a syntax object and a split path and a list of syntax objects and breaks it up - ; iff its a let/rec, wrapping those before the split and those after the split around the list of syntax + ; iff it's a let/rec, wrapping those before the split and those after the split around the list of syntax ; objects ; (->* (syntax? (union false? (listof number?)) (listof syntax?)) ((listof syntax?) syntax?)) (define (lift-helper stx path so-far-defs) diff --git a/collects/syntax-color/paren-tree.rkt b/collects/syntax-color/paren-tree.rkt index 73280ecb76..b856dad3f2 100644 --- a/collects/syntax-color/paren-tree.rkt +++ b/collects/syntax-color/paren-tree.rkt @@ -38,7 +38,7 @@ ;; records whose type field is a symbol that indicates which type of ;; (opening or closing) parenthesis begins the range being mapped. ;; The length field indicates how many characters the actual parenthesis - ;; is. In the special case that there is a region that is not preceeded + ;; is. In the special case that there is a region that is not preceded ;; with a parenthesis (that is, the region before the first parenthesis in ;; a buffer), the type will be #f, and the length will be 0. @@ -122,7 +122,7 @@ ;; If it indicates an error, the first two results give the ;; starting and stoping positions for error highlighting. ;; If all three return #f, then there was no tree to search, or - ;; the position did not immediately preceed an open. + ;; the position did not immediately precede an open. (define/public (match-forward pos) (send tree search! pos) (cond diff --git a/collects/syntax/doc.txt b/collects/syntax/doc.txt index b770b258ed..db2405d6c2 100644 --- a/collects/syntax/doc.txt +++ b/collects/syntax/doc.txt @@ -362,7 +362,7 @@ _modcode.ss_: getting module compiled code only a native-code non_loader version exists (i.e., `path' itself does not exist). A _loader extension is selected a last resort. - If an extension is prefered or is the only file that exists, it is + If an extension is preferred or is the only file that exists, it is supplied to `ext-proc' when `ext-proc' is #f, or an exception is raised (to report that an extension file cannot be used) when `ext-proc' is #f. diff --git a/collects/syntax/scribblings/modcode.scrbl b/collects/syntax/scribblings/modcode.scrbl index 9b21efa167..f9d8d69e89 100644 --- a/collects/syntax/scribblings/modcode.scrbl +++ b/collects/syntax/scribblings/modcode.scrbl @@ -58,7 +58,7 @@ are ignored, unless only a native-code non-@tt{_loader} version exists (i.e., @scheme[path] itself does not exist). A @tt{_loader} extension is selected a last resort. -If an extension is prefered or is the only file that exists, it is +If an extension is preferred or is the only file that exists, it is supplied to @scheme[ext-proc] when @scheme[ext-proc] is @scheme[#f], or an exception is raised (to report that an extension file cannot be used) when @scheme[ext-proc] is @scheme[#f]. diff --git a/collects/syntax/scribblings/parse/intro.scrbl b/collects/syntax/scribblings/parse/intro.scrbl index 033275df4c..d57811b32d 100644 --- a/collects/syntax/scribblings/parse/intro.scrbl +++ b/collects/syntax/scribblings/parse/intro.scrbl @@ -52,7 +52,7 @@ to what one would write using @scheme[syntax-rules] or perhaps ] Note the use of @scheme[...] and @scheme[...+] in the pattern; -@scheme[...] means match zero or more repetitions of the preceeding +@scheme[...] means match zero or more repetitions of the preceding pattern; @scheme[...+] means match one or more. Only @scheme[...] may be used in the template, however. diff --git a/collects/teachpack/2htdp/scribblings/image.scrbl b/collects/teachpack/2htdp/scribblings/image.scrbl index cb54ea8d11..6d5682a70a 100644 --- a/collects/teachpack/2htdp/scribblings/image.scrbl +++ b/collects/teachpack/2htdp/scribblings/image.scrbl @@ -95,7 +95,7 @@ Existing images can be rotated, scaled, flipped, and overlaid on top of each oth Adds a line to the image @racket[image], starting from the point (@racket[x1],@racket[y1]) and going to the point (@racket[x2],@racket[y2]). Unlike @racket[scene+line], if the line passes outside of @racket[image], the image - gets larger to accomodate the line. + gets larger to accommodate the line. @image-examples[(add-line (ellipse 40 40 "outline" "maroon") 0 40 40 0 "maroon") @@ -126,7 +126,7 @@ long the curve tries to stay with that angle. Larger numbers mean that the curve stays with the angle longer. Unlike @racket[scene+curve], if the line passes outside of @racket[image], the image - gets larger to accomodate the curve. + gets larger to accommodate the curve. @image-examples[(add-curve (rectangle 100 100 "solid" "black") diff --git a/collects/tests/drracket/drracket-test-util.rkt b/collects/tests/drracket/drracket-test-util.rkt index 7c343930c0..17b25c7fea 100644 --- a/collects/tests/drracket/drracket-test-util.rkt +++ b/collects/tests/drracket/drracket-test-util.rkt @@ -570,7 +570,7 @@ ;; run-one/sync : (-> A) -> A ;; runs the thunk `f' as a test action, and - ;; waits for it to complete. Also propogates + ;; waits for it to complete. Also propagates ;; exceptions. (define (run-one/sync f) (not-on-eventspace-handler-thread 'repl-in-edit-sequence?) diff --git a/collects/typed-scheme/scribblings/ts-reference.scrbl b/collects/typed-scheme/scribblings/ts-reference.scrbl index 48bcd6dc7b..d70af32bdf 100644 --- a/collects/typed-scheme/scribblings/ts-reference.scrbl +++ b/collects/typed-scheme/scribblings/ts-reference.scrbl @@ -442,7 +442,7 @@ can be used anywhere a definition form may be used.} the types @racket[t], and also provides all of the @racket[v]s.} @litchar{#{v : t}} This declares that the variable @racket[v] has type -@racket[t]. This is legal only for binding occurences of @racket[_v]. +@racket[t]. This is legal only for binding occurrences of @racket[_v]. @defform[(ann e t)]{Ensure that @racket[e] has type @racket[t], or some subtype. The entire expression has type @racket[t]. diff --git a/collects/typed-scheme/typecheck/tc-app.rkt b/collects/typed-scheme/typecheck/tc-app.rkt index a21d9ecf1d..15df18a18e 100644 --- a/collects/typed-scheme/typecheck/tc-app.rkt +++ b/collects/typed-scheme/typecheck/tc-app.rkt @@ -657,7 +657,7 @@ (match-let* ([(list last tys-r ...) (reverse (map tc-expr/t (syntax->list #'args)))] [tys (reverse tys-r)]) (ret (foldr make-Pair last tys)))] - ;; special case for `reverse' to propogate expected type info + ;; special case for `reverse' to propagate expected type info [(#%plain-app reverse arg) (match expected [(tc-result1: (Listof: _)) diff --git a/collects/unstable/scribblings/gui/slideshow.scrbl b/collects/unstable/scribblings/gui/slideshow.scrbl index 3c3ddad1b5..9047d293d3 100644 --- a/collects/unstable/scribblings/gui/slideshow.scrbl +++ b/collects/unstable/scribblings/gui/slideshow.scrbl @@ -159,7 +159,7 @@ Shades @scheme[pict] to show with @scheme[ratio] of its normal opacity; if These pict control flow operators decide which pict of several to use. All branches are evaluated; the resulting pict is a combination of the pict chosen by normal conditional flow with @scheme[ghost] applied to all the other picts. -The result is a picture large enough to accomodate each alternative, but showing +The result is a picture large enough to accommodate each alternative, but showing only the chosen one. This is useful for staged slides, as the pict chosen may change with each slide but its size and position will not. diff --git a/collects/web-server/private/configure.rkt b/collects/web-server/private/configure.rkt index 96b13bab55..a097b56a69 100644 --- a/collects/web-server/private/configure.rkt +++ b/collects/web-server/private/configure.rkt @@ -740,7 +740,7 @@ [copy-conf (lambda (from to) (let ([to-path (build-path-unless-absolute conf to)]) - ; more here - check existance of from path + ; more here - check existence of from path (copy-file* (build-path from-conf from) to-path)))]) (copy-conf "passwords-refresh.html" (messages-passwords-refreshed messages)) (copy-conf "servlet-refresh.html" (messages-servlets-refreshed messages)) diff --git a/collects/web-server/scribblings/contracts.scrbl b/collects/web-server/scribblings/contracts.scrbl index 4e01b86ecd..b83bdef33f 100644 --- a/collects/web-server/scribblings/contracts.scrbl +++ b/collects/web-server/scribblings/contracts.scrbl @@ -9,7 +9,7 @@ @defmodule[web-server/servlet/servlet-structs]{ Servlets communicate to the Web Server by returning HTTP responses. In order to -accomodate lightweight programs (and backwards compatibility), the Web Server +accommodate lightweight programs (and backwards compatibility), the Web Server provides an indirection from application-specific response formats and the internal HTTP response format, @racket[response]. diff --git a/collects/web-server/scribblings/web.scrbl b/collects/web-server/scribblings/web.scrbl index 9968ea3a02..d94f166d7e 100644 --- a/collects/web-server/scribblings/web.scrbl +++ b/collects/web-server/scribblings/web.scrbl @@ -97,7 +97,7 @@ functions of interest for the servlet developer. "+"))))))))) ] Notice that in this example the result of the handlers are returned to the continuation of @racket[send/suspend/dispatch]. - However, it is very common that the return value of @racket[send/suspend/dispatch] is irrevelant in + However, it is very common that the return value of @racket[send/suspend/dispatch] is irrelevant in your application and you may think of it as ``embedding'' value-less callbacks. Here is the same example in this style: @racketblock[ (define (count-dot-com i) diff --git a/doc/release-notes/drracket/HISTORY.txt b/doc/release-notes/drracket/HISTORY.txt index 338420147f..701c34ce1a 100644 --- a/doc/release-notes/drracket/HISTORY.txt +++ b/doc/release-notes/drracket/HISTORY.txt @@ -873,7 +873,7 @@ GENERAL now it shows `('a 'a). - The portion of space between the definitions and - interactions window is now interactively changable. + interactions window is now interactively changeable. - the bug report form now connects to bugs.drscheme.org instead of cs.rice.edu directly, so earthlink users @@ -962,7 +962,7 @@ General - files added to projects are now stored as relative files, by default. (use project menu to change the default) - - project files are saved using a platform-independant syntax for + - project files are saved using a platform-independent syntax for paths now. - Using file|open and choosing a project file (based on contents) will open diff --git a/doc/release-notes/gracket/HISTORY.txt b/doc/release-notes/gracket/HISTORY.txt index 75948fb329..8085ccf1fe 100644 --- a/doc/release-notes/gracket/HISTORY.txt +++ b/doc/release-notes/gracket/HISTORY.txt @@ -1285,7 +1285,7 @@ System: Changed force-redraw to ignore refresh requests when the redraw-requesting window is not shown. Redraw requests are now - propogated to the top-level frame or dialog via child-redraw-request. + propagated to the top-level frame or dialog via child-redraw-request. - if your application is unititized, then you need to change the startup procedure. See the application startup section in the toolbox manual. @@ -1655,7 +1655,7 @@ Bug fixes, especially Motif and memory bugs Rewrote editor line-maintenance Faster caret updating Upgraded garbage collector -File format changed to accomodate nested buffers with +File format changed to accommodate nested buffers with separate style lists Standard system standardized Code changes for compiling on MSWindows (almost works...) diff --git a/doc/release-notes/racket/HISTORY.txt b/doc/release-notes/racket/HISTORY.txt index 21d404529f..05ecb5f2e2 100644 --- a/doc/release-notes/racket/HISTORY.txt +++ b/doc/release-notes/racket/HISTORY.txt @@ -1314,7 +1314,7 @@ Refined error messages Version 49, May 31, 1997 Multiple superclass inheritance is no longer supported Added (Java-ish) interfaces to object system -class* syntax changed to accomodate interfaces and removed +class* syntax changed to accommodate interfaces and removed multiple superclasses uq-ivar always takes two arguments; class is not a legal argument uq-make-generic accepts a class or an interface diff --git a/doc/srfi-std/srfi-4.html b/doc/srfi-std/srfi-4.html index 00f474d9dc..5dab25b2ff 100644 --- a/doc/srfi-std/srfi-4.html +++ b/doc/srfi-std/srfi-4.html @@ -187,7 +187,7 @@ must be quoted just like heterogeneous vectors must be. Homogeneous vectors can appear in quasiquotations but must not contain unquote or unquote-splicing forms (i.e. `(,x #u8(1 2)) is legal but `#u8(1 ,x -2) is not). This restriction is to accomodate the many Scheme +2) is not). This restriction is to accommodate the many Scheme systems that use the read procedure to parse programs.

diff --git a/doc/srfi-std/srfi-40.html b/doc/srfi-std/srfi-40.html index 902fba7e8a..734078142c 100644 --- a/doc/srfi-std/srfi-40.html +++ b/doc/srfi-std/srfi-40.html @@ -259,7 +259,7 @@ and even streams. We expect the two constructors nil and nil and cons return a strict list, but the even nil and cons return promises. Nil?, car and cdr change to -accomodate the underlying representation differences. +accommodate the underlying representation differences. Cutoff is identical in the two versions, because it doesn't return a stream.

diff --git a/doc/srfi-std/srfi-67/srfi-67.html b/doc/srfi-std/srfi-67/srfi-67.html index 26dd01f9b5..f8fd0cb482 100644 --- a/doc/srfi-std/srfi-67/srfi-67.html +++ b/doc/srfi-std/srfi-67/srfi-67.html @@ -377,7 +377,7 @@ procedures, as explained in Section 5. Also note the implicit use of refine-compare in the bowl?-case.

-The preceeding example illustrates the main functionality of this SRFI. +The preceding example illustrates the main functionality of this SRFI. For other examples, refer to Section 4.4, and to the file examples.scm included in the reference implementation.

diff --git a/doc/srfi-std/srfi-98.html b/doc/srfi-std/srfi-98.html index d8fe1be7be..8ff8dfbb8f 100644 --- a/doc/srfi-std/srfi-98.html +++ b/doc/srfi-std/srfi-98.html @@ -51,7 +51,7 @@ environment variables.

Most operating systems provide a mechanism for passing auxiliary parameters implicitly to child processes. Usually, this mechanism is called "the environment", and is conceptually a map from string names -to string values. The string names are called enviornment +to string values. The string names are called environment variables.

Some applications rely on environment variables to modify their diff --git a/src/foreign/libffi/src/dlmalloc.c b/src/foreign/libffi/src/dlmalloc.c index 0fa235af22..615dc4f35d 100644 --- a/src/foreign/libffi/src/dlmalloc.c +++ b/src/foreign/libffi/src/dlmalloc.c @@ -5088,7 +5088,7 @@ History: Wolfram Gloger (Gloger@lrz.uni-muenchen.de). * Use last_remainder in more cases. * Pack bins using idea from colin@nyx10.cs.du.edu - * Use ordered bins instead of best-fit threshhold + * Use ordered bins instead of best-fit threshold * Eliminate block-local decls to simplify tracing and debugging. * Support another case of realloc via move into top * Fix error occuring when initial sbrk_base not word-aligned. diff --git a/src/foreign/libffi/src/x86/ffi64.c b/src/foreign/libffi/src/x86/ffi64.c index 07a2627b1f..05ebf17568 100644 --- a/src/foreign/libffi/src/x86/ffi64.c +++ b/src/foreign/libffi/src/x86/ffi64.c @@ -366,7 +366,7 @@ ffi_prep_cif_machdep (ffi_cif *cif) /* Go over all arguments and determine the way they should be passed. If it's in a register and there is space for it, let that be so. If - not, add it's size to the stack byte count. */ + not, add its size to the stack byte count. */ for (bytes = 0, i = 0, avn = cif->nargs; i < avn; i++) { if (examine_argument (cif->arg_types[i], classes, 0, &ngpr, &nsse) == 0 diff --git a/src/foreign/libffi/texinfo.tex b/src/foreign/libffi/texinfo.tex index ff2c40654b..24ecf36d0e 100644 --- a/src/foreign/libffi/texinfo.tex +++ b/src/foreign/libffi/texinfo.tex @@ -3,7 +3,7 @@ % Load plain if necessary, i.e., if running under initex. \expandafter\ifx\csname fmtname\endcsname\relax\input plain\fi % -\def\texinfoversion{2005-07-05.19} +\def\texinfoversion{2011-02-02.11} % % Copyright (C) 1985, 1986, 1988, 1990, 1991, 1992, 1993, 1994, 1995, % 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005 Free Software @@ -415,7 +415,7 @@ \def\argremovecomment#1\comment#2\ArgTerm{\argremovec #1\c\ArgTerm} \def\argremovec#1\c#2\ArgTerm{\argcheckspaces#1\^^M\ArgTerm} -% Each occurence of `\^^M' or `\^^M' is replaced by a single space. +% Each occurrence of `\^^M' or `\^^M' is replaced by a single space. % % \argremovec might leave us with trailing space, e.g., % @end itemize @c foo @@ -498,7 +498,7 @@ % used to check whether the current environment is the one expected. % % Non-false conditionals (@iftex, @ifset) don't fit into this, so they -% are not treated as enviroments; they don't open a group. (The +% are not treated as environments; they don't open a group. (The % implementation of @end takes care not to call \endgroup in this % special case.) diff --git a/src/plot/plplot/plmap.c b/src/plot/plplot/plmap.c index 52cc62982a..399795a049 100644 --- a/src/plot/plplot/plmap.c +++ b/src/plot/plplot/plmap.c @@ -47,7 +47,7 @@ * * plot continental outline in world coordinates * - * v1.4: machine independant version + * v1.4: machine independent version * v1.3: replaced plcontinent by plmap, added plmeridians * v1.2: 2 arguments: mapform, type of plot * diff --git a/src/plot/plplot/plplot.h b/src/plot/plplot/plplot.h index acd3e7bf10..7a09f5362c 100644 --- a/src/plot/plplot/plplot.h +++ b/src/plot/plplot/plplot.h @@ -387,7 +387,7 @@ typedef struct { * change the object names, but then everybody who wants to use the * package must throw these same switches, leading to no end of trouble. * - * Note that this definition should not cause any noticable effects except + * Note that this definition should not cause any noticeable effects except * when debugging PLplot calls, in which case you will need to remember * the real function names (same as before but with a 'c_' prepended). * diff --git a/src/plot/plplot/plplotP.h b/src/plot/plplot/plplotP.h index 71b5c636aa..d963d1e83b 100644 --- a/src/plot/plplot/plplotP.h +++ b/src/plot/plplot/plplotP.h @@ -627,12 +627,12 @@ plP_gprec(PLINT *p_setp, PLINT *p_prec); PLFLT plstrl(const char *string); -/* Similar to strpos, but searches for occurence of string str2. */ +/* Similar to strpos, but searches for occurrence of string str2. */ PLINT plP_stindex(const char *str1, const char *str2); -/* Searches string str for first occurence of character chr. */ +/* Searches string str for first occurrence of character chr. */ PLINT plP_strpos(char *str, int chr); diff --git a/src/plot/plplot/plshade.c b/src/plot/plplot/plshade.c index b2cb7843b0..6ce1b4e77c 100644 --- a/src/plot/plplot/plshade.c +++ b/src/plot/plplot/plshade.c @@ -347,8 +347,8 @@ plfshade(PLFLT (*f2eval) (PLINT, PLINT, PLPointer), * parameters: * * f2eval, f2eval_data: data to plot - * c2eval, c2eval_data: defined mask (not implimented) - * defined: defined mask (old API - implimented) + * c2eval, c2eval_data: defined mask (not implemented) + * defined: defined mask (old API - implemented) * missing_min, missing_max: yet another way to set data to undefined * nx, ny: array dimensions * xmin, xmax, ymin, ymax: grid coordinates diff --git a/src/plot/plplot/plsym.c b/src/plot/plplot/plsym.c index 2d0dba4bb0..e708f940c1 100644 --- a/src/plot/plplot/plsym.c +++ b/src/plot/plplot/plsym.c @@ -917,7 +917,7 @@ pldeco(short int **symbol, PLINT *length, const char *text) /*--------------------------------------------------------------------------*\ * PLINT plP_strpos() * - * Searches string str for first occurence of character chr. If found + * Searches string str for first occurrence of character chr. If found * the position of the character in the string is returned (the first * character has position 0). If the character is not found a -1 is * returned. @@ -937,7 +937,7 @@ plP_strpos(char *str, int chr) /*--------------------------------------------------------------------------*\ * PLINT plP_stindex() * - * Similar to strpos, but searches for occurence of string str2. + * Similar to strpos, but searches for occurrence of string str2. \*--------------------------------------------------------------------------*/ PLINT diff --git a/src/racket/gc/Makefile.dj b/src/racket/gc/Makefile.dj index c56ea7b03f..4b0c7b48d7 100644 --- a/src/racket/gc/Makefile.dj +++ b/src/racket/gc/Makefile.dj @@ -84,7 +84,7 @@ CFLAGS= -gstabs+ -O2 -I$(srcdir)/include -DATOMIC_UNCOLLECTABLE -DALL_INTERIOR_P # -DJAVA_FINALIZATION makes it somewhat safer to finalize objects out of # order by specifying a nonstandard finalization mark procedure (see # finalize.c). Objects reachable from finalizable objects will be marked -# in a sepearte postpass, and hence their memory won't be reclaimed. +# in a separate postpass, and hence their memory won't be reclaimed. # Not recommended unless you are implementing a language that specifies # these semantics. Since 5.0, determines only only the initial value # of GC_java_finalization variable. diff --git a/src/racket/gc/doc/README.changes b/src/racket/gc/doc/README.changes index 27bf33eaaa..34c494eb2e 100644 --- a/src/racket/gc/doc/README.changes +++ b/src/racket/gc/doc/README.changes @@ -1554,7 +1554,7 @@ Since 6.1alpha3: - Force 64 bit alignment with GCJ support. (Reflects Bryce McKinley's patch to the gcc tree.) - Refined the choice of sa_handler vs. sa_sigaction in GC_dirty_init - to accomodate some glibc5 systems. (Thanks to Dan Fandrich for the + to accommodate some glibc5 systems. (Thanks to Dan Fandrich for the patch.) - Compensated for the fact that current versions of glibc set __libc_stack_end incorrectly on Linux/IA64 while initialization code diff --git a/src/racket/gc/dyn_load.c b/src/racket/gc/dyn_load.c index 57ddce8955..ef4db4219d 100644 --- a/src/racket/gc/dyn_load.c +++ b/src/racket/gc/dyn_load.c @@ -1194,7 +1194,7 @@ void GC_register_dynamic_libraries() PCR_IL_LoadedFile * p = PCR_IL_GetLastLoadedFile(); PCR_IL_LoadedSegment * q; - /* Skip uncommited files */ + /* Skip uncommitted files */ while (p != NIL && !(p -> lf_commitPoint)) { /* The loading of this file has not yet been committed */ /* Hence its description could be inconsistent. */ diff --git a/src/racket/gc/win32_threads.c b/src/racket/gc/win32_threads.c index 272af63a43..fed8ec6e57 100644 --- a/src/racket/gc/win32_threads.c +++ b/src/racket/gc/win32_threads.c @@ -1249,7 +1249,7 @@ int GC_pthread_join(pthread_t pthread_id, void **retval) { } /* Cygwin-pthreads calls CreateThread internally, but it's not - * easily interceptible by us.. + * easily interceptable by us.. * so intercept pthread_create instead */ int diff --git a/src/racket/include/scheme.h b/src/racket/include/scheme.h index 58e50d815d..a5ce5aad71 100644 --- a/src/racket/include/scheme.h +++ b/src/racket/include/scheme.h @@ -389,7 +389,7 @@ typedef intptr_t (*Scheme_Secondary_Hash_Proc)(Scheme_Object *obj, void *cycle_d #define SCHEME_PATHP(obj) SAME_TYPE(SCHEME_TYPE(obj), SCHEME_PLATFORM_PATH_KIND) #define SCHEME_GENERAL_PATHP(obj) ((SCHEME_TYPE(obj) >= scheme_unix_path_type) && (SCHEME_TYPE(obj) <= scheme_windows_path_type)) - /* A path is guranteed to have the same shape as a byte string */ + /* A path is guaranteed to have the same shape as a byte string */ #define SCHEME_PATH_STRINGP(x) (SCHEME_CHAR_STRINGP(x) || SCHEME_PATHP(x)) #define SCHEME_PATH_STRING_STR "path or string" diff --git a/src/racket/sgc/sgc.c b/src/racket/sgc/sgc.c index 43fea9f8e6..5545169f52 100644 --- a/src/racket/sgc/sgc.c +++ b/src/racket/sgc/sgc.c @@ -315,7 +315,7 @@ malloc() to avoid waste when obtaining the proper alignment. */ #define SECTOR_SEGMENT_GROUP_SIZE 32 -/* Number of bits used in 32-bit level table for checking existance of +/* Number of bits used in 32-bit level table for checking existence of a sector. Creates a table of (1 << SECTOR_LOOKUP_SHIFT) pointers to individual page tables of size SECTOR_LOOKUP_PAGESIZE. */ #define SECTOR_LOOKUP_PAGESETBITS 12 diff --git a/src/racket/src/dlcompat.inc b/src/racket/src/dlcompat.inc index 5736b41ecb..a11e5caff3 100644 --- a/src/racket/src/dlcompat.inc +++ b/src/racket/src/dlcompat.inc @@ -153,7 +153,7 @@ static const char * safegetenv(const char * s) * trying to locate a module. We first look at the values of LD_LIBRARY_PATH * and DYLD_LIBRARY_PATH, and then finally fall back to looking into * /usr/lib and /lib. Since both of the environments variables can contain a - * list of colon seperated paths, we simply concat them and the two other paths + * list of colon separated paths, we simply concat them and the two other paths * into one big string, which we then can easily parse. * Splitting this string into the actual path list is done by getSearchPath() */ diff --git a/src/racket/src/jit.c b/src/racket/src/jit.c index 7a9249c8eb..ee5591338c 100644 --- a/src/racket/src/jit.c +++ b/src/racket/src/jit.c @@ -920,7 +920,7 @@ static void *top4; that multiple adjustments to the register can be collapsed; this mostly improves code size, rather than speed. Functions that cause the register to be de-sync'd are marked as such. Functions that can - accomodate a de-sync'd register on entry are marked as such. All + accommodate a de-sync'd register on entry are marked as such. All other fuctions can assume a sync'd regsiter and ensure a sync'd register. Note that branches and calls normally require a sync'd register. */ @@ -5289,7 +5289,7 @@ static int generate_arith(mz_jit_state *jitter, Scheme_Object *rator, Scheme_Obj If rand is NULL, then we're generating part of the fast path for an nary arithmatic over a binary operator; the first argument is already in R0 (fixnum or min/max) or a floating-point register - (flonum) and the second arguement is in R1 (fixnum or min/max) or a + (flonum) and the second argument is in R1 (fixnum or min/max) or a floating-point register (flonum). For unsafe_fx or unsafe_fl, -1 means safe but specific to the type. */ diff --git a/src/racket/src/portfun.c b/src/racket/src/portfun.c index 36ea75dbbb..44f5557813 100644 --- a/src/racket/src/portfun.c +++ b/src/racket/src/portfun.c @@ -1829,7 +1829,7 @@ static intptr_t pipe_write_bytes(Scheme_Output_Port *p, avail = pipe->bufstart - pipe->bufend - 1; } if (pipe->bufmax) { - /* Again, it's possible that the port grew to accomodate + /* Again, it's possible that the port grew to accommodate past peeks... */ intptr_t extra; extra = pipe->buflen - (pipe->bufmax + pipe->bufmaxextra); diff --git a/src/racket/src/regexp.c b/src/racket/src/regexp.c index 17de31368f..a37f9e5ece 100644 --- a/src/racket/src/regexp.c +++ b/src/racket/src/regexp.c @@ -2075,7 +2075,7 @@ regunicode(int negate) regparse += len + 1; ret = regnode(UNIPROP); - /* This encoding accomodates up to 63 categories: */ + /* This encoding accommodates up to 63 categories: */ regarg((negate << 13) | (bottom << 6) | top); return ret; diff --git a/src/racket/src/thread.c b/src/racket/src/thread.c index 32af2b0364..ecee0b1441 100644 --- a/src/racket/src/thread.c +++ b/src/racket/src/thread.c @@ -22,7 +22,7 @@ /* This file implements Racket threads. Usually, Racket threads are implemented by copying the stack. - The scheme_thread_block() function is called occassionally by the + The scheme_thread_block() function is called occasionally by the evaluator so that the current thread can be swapped out. do_swap_thread() performs the actual swap. Threads can also be implemented by the OS; the bottom part of this file contains