Ticket #67 (closed defect)

Opened 6 years ago

Last modified 6 years ago

module-path? contract broken

Reported by: vegashacker Owned by: untyped
Priority: major Milestone:
Component: untyped/instaservlet.plt Keywords:
Cc: rob.hunter@… Version: (1 6)
Racket Version:

Description

Although I could be insane, I *think* instaservlet no longer works in 4.1.x:

Welcome to MzScheme? v4.1.0.3 [3m], Copyright (c) 2004-2008 PLT Scheme Inc.

(require (planet untyped/instaservlet/instaservlet))
(define (servlet request) '(html (body "fooyah")))
(go! servlet)

servlet-path is '/Users/rob/Library/PLT Scheme/planet/300/4.1.0.3/cache/untyped/instaservlet.plt/1/6/./servlet-shim.ss'
(planet "dispatcher.ss" ("schematics" "instaweb.plt" 3)) broke the contract

(->*

()
(#:to-be-copied-module-specs

(listof module-path?))

(->*

()
(#:additional-specs (listof module-path?))
namespace?))

on make-make-servlet-namespace; expected <(listof module-path?)>, given: ("/Users/rob/Library/PLT Scheme/planet/300/4.1.0.3/cache/untyped/instaservlet.plt/1/6/./servlet-shim.ss")

context


/Applications/PLT Scheme v4.1.0.3/collects/scheme/private/contract-guts.ss:221:0: raise-contract-error
core
/Users/rob/Library/PLT Scheme/planet/300/4.1.0.3/cache/schematics/instaweb.plt/3/2/dispatcher.ss:55:0
core
/Applications/PLT Scheme v4.1.0.3/collects/scheme/private/misc.ss:74:7

Change History

in reply to: ↑ description   Changed 6 years ago by vegashacker

FYI, the "servlet-path is..." in the above spew is my debugging code that I forgot to remove.

  Changed 6 years ago by vegashacker

  • cc rob.hunter@… added

  Changed 6 years ago by untyped

  • status changed from new to closed

It looks like the module-path? predicate has recently been tightened up. I've changed the servlet-shim require path to use the (file ...) form, which accepts absolute paths.

Note: See TracTickets for help on using tickets.