Run the following code:

(with-output-to-file "X" #:exists 'truncate
(lambda () (for ([i 2044]) (display " x")) (newline)))

Now, in a shell that supports enough command-line arguments, run

racket cat X

and this results in a segfault.

GDB shows this stacktrace:
#0 0x0000003d132330c5 in raise () from /lib64/libc.so.6
#1 0x0000003d13234a76 in abort () from /lib64/libc.so.6
#2 0x00000000006419d9 in fault_handler ()
#3
#4 0x000000000064a8eb in allocate_big ()
#5 0x0000000000425b89 in scheme_malloc_fail_ok ()
#6 0x00000000006293cf in scheme_make_vector ()
#7 0x0000000000423f54 in run_from_cmd_line.clone.1 ()
#8 0x0000000000425059 in main_after_stack ()
#9 0x00000000004256d1 in scheme_main_stack_setup ()
#10 0x000000000042509e in main ()

[anon-submit [email protected]]

This program seems to loop forever.

#lang racket
(define h 
">Number:         105\n>Category:       mcmicmac\n>Synopsis:       language levels\n>Confidential:   no\n>Severity:       serious\n>Priority:       medium\n>Responsible:    shriram\n>State:          closed\n>Class:          sw-bug\n>Submitter-Id:   unknown\n>Arrival-Date:   Mon May 19 14:35:02 -0400 1997\n>Last-Modified:  Wed Apr 28 11:02:13 -0400 2004\n>Originator:     Mark W. Krentel\n>Release:        unknown\n\n")
(define r 
  #px">Number:\\s+(.*)\n>Category:\\s+(.*)\n>Synopsis:\\s+(.*)\n>Confidential:\\s+(.*)\n>Severity:\\s+(.*)\n>Priority:\\s+(.*)\n>Responsible:\\s+(.*)\n>State:\\s+(.*)\n>Class:\\s+(.*)\n>Submitter-Id:\\s+(.*)\n>Arrival-Date:\\s+(.*)\n>Closed-Date:\\s+(.*)\n>Last-Modified:\\s+(.*)\n>Originator:\\s+(.*)\n>Release:")
(regexp-match r h)

you cannot be serious

posted with token from racket

it worked!

eeek, spiders

you cannot be serious

text in the body

Run the following code:

(with-output-to-file "X" #:exists 'truncate
(lambda () (for ([i 2044]) (display " x")) (newline)))

Now, in a shell that supports enough command-line arguments, run

racket cat X

and this results in a segfault.

GDB shows this stacktrace:
#0 0x0000003d132330c5 in raise () from /lib64/libc.so.6
#1 0x0000003d13234a76 in abort () from /lib64/libc.so.6
#2 0x00000000006419d9 in fault_handler ()
#3
#4 0x000000000064a8eb in allocate_big ()
#5 0x0000000000425b89 in scheme_malloc_fail_ok ()
#6 0x00000000006293cf in scheme_make_vector ()
#7 0x0000000000423f54 in run_from_cmd_line.clone.1 ()
#8 0x0000000000425059 in main_after_stack ()
#9 0x00000000004256d1 in scheme_main_stack_setup ()
#10 0x000000000042509e in main ()

text in the body

text in the body

you cannot be serious

you cannot be serious

you cannot be serious

Originally submitted on: Fri Jun 24 13:04:01 -0400 2011
Run the following code:

(with-output-to-file "X" #:exists 'truncate
(lambda () (for ([i 2044]) (display " x")) (newline)))

Now, in a shell that supports enough command-line arguments, run

racket cat X

and this results in a segfault.

GDB shows this stacktrace:
#0 0x0000003d132330c5 in raise () from /lib64/libc.so.6
#1 0x0000003d13234a76 in abort () from /lib64/libc.so.6
#2 0x00000000006419d9 in fault_handler ()
#3
#4 0x000000000064a8eb in allocate_big ()
#5 0x0000000000425b89 in scheme_malloc_fail_ok ()
#6 0x00000000006293cf in scheme_make_vector ()
#7 0x0000000000423f54 in run_from_cmd_line.clone.1 ()
#8 0x0000000000425059 in main_after_stack ()
#9 0x00000000004256d1 in scheme_main_stack_setup ()
#10 0x000000000042509e in main ()

This bug was converted from Gnats bug 12000, the original is at http://bugs.racket-lang.org/query/?cmd=view&pr=12000

Run the following code:

(with-output-to-file "X" #:exists 'truncate
(lambda () (for ([i 2044]) (display " x")) (newline)))

Now, in a shell that supports enough command-line arguments, run

racket cat X

and this results in a segfault.

GDB shows this stacktrace:
#0 0x0000003d132330c5 in raise () from /lib64/libc.so.6
#1 0x0000003d13234a76 in abort () from /lib64/libc.so.6
#2 0x00000000006419d9 in fault_handler ()
#3
#4 0x000000000064a8eb in allocate_big ()
#5 0x0000000000425b89 in scheme_malloc_fail_ok ()
#6 0x00000000006293cf in scheme_make_vector ()
#7 0x0000000000423f54 in run_from_cmd_line.clone.1 ()
#8 0x0000000000425059 in main_after_stack ()
#9 0x00000000004256d1 in scheme_main_stack_setup ()
#10 0x000000000042509e in main ()

you cannot be serious

you cannot be serious

eeek, spiders

you cannot be serious

you cannot be serious

you cannot be serious

Run the following code:

(with-output-to-file "X" #:exists 'truncate
(lambda () (for ([i 2044]) (display " x")) (newline)))

Now, in a shell that supports enough command-line arguments, run

racket cat X

and this results in a segfault.

GDB shows this stacktrace:
#0 0x0000003d132330c5 in raise () from /lib64/libc.so.6
#1 0x0000003d13234a76 in abort () from /lib64/libc.so.6
#2 0x00000000006419d9 in fault_handler ()
#3
#4 0x000000000064a8eb in allocate_big ()
#5 0x0000000000425b89 in scheme_malloc_fail_ok ()
#6 0x00000000006293cf in scheme_make_vector ()
#7 0x0000000000423f54 in run_from_cmd_line.clone.1 ()
#8 0x0000000000425059 in main_after_stack ()
#9 0x00000000004256d1 in scheme_main_stack_setup ()
#10 0x000000000042509e in main ()

The following TR code fails:

lang typed/racket

(struct: point ([x : Number] [y : Number]))
(provide (struct-out point))

with this error:
module: identifier already provided (as a different binding) in: point

In addition, trying to step through this in the macro stepper fails. Steps:

• run macro stepper on above code (macro hiding off)
• step to end
• step back

The following error is produced:

in-list: expected argument of type <list>; given #<void>

 === context ===
/home/asumu/plt/current/collects/racket/private/for.rkt:546:2: in-list
/home/asumu/plt/current/collects/macro-debugger/syntax-browser/display.rkt:148:4: highlight-syntaxes method in display%
/home/asumu/plt/current/collects/macro-debugger/view/step-display.rkt:71:4
/home/asumu/plt/current/collects/macro-debugger/view/stepper.rkt:437:4: update* method in macro-stepper-widget%
/home/asumu/plt/current/collects/macro-debugger/view/stepper.rkt:399:31
/home/asumu/plt/current/collects/macro-debugger/view/stepper.rkt:368:24

Run the following code:

(with-output-to-file "X" #:exists 'truncate
(lambda () (for ([i 2044]) (display " x")) (newline)))

Now, in a shell that supports enough command-line arguments, run

racket cat X

and this results in a segfault.

GDB shows this stacktrace:
#0 0x0000003d132330c5 in raise () from /lib64/libc.so.6
#1 0x0000003d13234a76 in abort () from /lib64/libc.so.6
#2 0x00000000006419d9 in fault_handler ()
#3
#4 0x000000000064a8eb in allocate_big ()
#5 0x0000000000425b89 in scheme_malloc_fail_ok ()
#6 0x00000000006293cf in scheme_make_vector ()
#7 0x0000000000423f54 in run_from_cmd_line.clone.1 ()
#8 0x0000000000425059 in main_after_stack ()
#9 0x00000000004256d1 in scheme_main_stack_setup ()
#10 0x000000000042509e in main ()

you cannot be serious

you cannot be serious

you cannot be serious

you cannot be serious

Enter the following:

lang typed/racket

(+ "foo")
(+ "foo")

hit "macro stepper". nothing happens.

If you take out one of the lines, the macro stepper works again.

wtf alert

Originally submitted on: Fri Jun 24 13:04:01 -0400 2011
Run the following code:

(with-output-to-file "X" #:exists 'truncate
(lambda () (for ([i 2044]) (display " x")) (newline)))

Now, in a shell that supports enough command-line arguments, run

racket cat X

and this results in a segfault.

GDB shows this stacktrace:
#0 0x0000003d132330c5 in raise () from /lib64/libc.so.6
#1 0x0000003d13234a76 in abort () from /lib64/libc.so.6
#2 0x00000000006419d9 in fault_handler ()
#3
#4 0x000000000064a8eb in allocate_big ()
#5 0x0000000000425b89 in scheme_malloc_fail_ok ()
#6 0x00000000006293cf in scheme_make_vector ()
#7 0x0000000000423f54 in run_from_cmd_line.clone.1 ()
#8 0x0000000000425059 in main_after_stack ()
#9 0x00000000004256d1 in scheme_main_stack_setup ()
#10 0x000000000042509e in main ()

This bug was converted from Gnats bug 12000, the original is at http://bugs.racket-lang.org/query/?cmd=view&pr=12000