Skip to content

Commit

Permalink
openmcl; still huge sendbuf bugs
Browse files Browse the repository at this point in the history
  • Loading branch information
vii committed Jul 19, 2008
1 parent a32384f commit e1d8483
Show file tree
Hide file tree
Showing 48 changed files with 1,834 additions and 964 deletions.
1 change: 1 addition & 0 deletions addons/parenscript/contributors
Original file line number Diff line number Diff line change
Expand Up @@ -13,3 +13,4 @@ Marijn Haverbeke
Vladimir Sedach
John Fremlin
Red Daly
Travis Cross
18 changes: 9 additions & 9 deletions addons/parenscript/docs/introduction.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -44,19 +44,19 @@ function foobar(a, b) {

;;; It also supports additional iteration constructs, relieving the
;;; programmer of the burden of iterating over arrays.
;;; `for' loops can be written using the customary `DO' syntax.
;;; `for' loops can be written using the customary `DO*' syntax.

(ps
(do ((i 0 (incf i))
(j (aref arr i) (aref arr i)))
((>= i 10))
(do* ((i 0 (incf i))
(j (aref arr i) (aref arr i)))
((>= i 10))
(alert (+ "i is " i " and j is " j))))

; compiles to
;; compiles to
"
for (var i = 0, j = arr[i]; i < 10; i = ++i, j = arr[i]) {
alert('i is ' + i + ' and j is ' + j);
}
};
"
;;; ParenScript uses the Lisp reader, allowing for reader macros. It
;;; also comes with its own macro environment, allowing host Lisp
Expand All @@ -74,7 +74,7 @@ for (var i = 0, j = arr[i]; i < 10; i = ++i, j = arr[i]) {
(create :foo "foo"
:bla "bla"))

; compiles to
;; compiles to
"
{ foo : 'foo',
bla : 'bla' }
Expand All @@ -92,7 +92,7 @@ for (var i = 0, j = arr[i]; i < 10; i = ++i, j = arr[i]) {
"The link is: "
((:a :href href) link-text))))))

; compiles to
;; compiles to
"
function addDiv(name, href, linkText) {
document.write('<div id=\"' + name + '\">The link is: <a href=\"'
Expand All @@ -117,7 +117,7 @@ function addDiv(name, href, linkText) {
(div.bl0rg :font-family "serif")
(("a:active" "a:hoover") :color "black" :size "200%"))))))

; which produces
;; which produces

<html><head><style type="text/css">
<!--
Expand Down
8 changes: 4 additions & 4 deletions addons/parenscript/docs/pbook.py
Original file line number Diff line number Diff line change
Expand Up @@ -218,14 +218,14 @@ def formatBuffer(self):
lines.pop(0)
self.lineCounter += 1
continue
elif self.figureRe.match(line):
elif self.figureRe.match(line):
line = lines.pop(0)
self.doFigure(line)
self.lineCounter += 1
elif self.escapeRe.match(line):
self.lineCounter += 1
elif self.escapeRe.match(line):
line = lines.pop(0)
self.doEscape(line)
self.lineCounter += 1
self.lineCounter += 1
elif self.headingRe.match(line):
line = lines.pop(0)
self.doHeading(line)
Expand Down
Loading

0 comments on commit e1d8483

Please sign in to comment.