[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Bug-mit-scheme] [bug #47691] An expected result of `(define (A) (* 2 2)
From: |
wxw |
Subject: |
[Bug-mit-scheme] [bug #47691] An expected result of `(define (A) (* 2 2))` |
Date: |
Thu, 14 Apr 2016 02:07:00 +0000 |
User-agent: |
Mozilla/5.0 (X11; Ubuntu; Linux i686; rv:44.0) Gecko/20100101 Firefox/44.0 |
URL:
<http://savannah.gnu.org/bugs/?47691>
Summary: An expected result of `(define (A) (* 2 2))`
Project: MIT/GNU Scheme
Submitted by: wxw1234
Submitted on: Thu 14 Apr 2016 02:06:59 AM UTC
Category: compiler
Severity: 3 - Normal
Priority: 5 - Normal
Item Group: Incorrect behavior
Status: None
Privacy: Public
Assigned to: None
Originator Name:
Originator Email:
Open/Closed: Open
Discussion Lock: Any
Keywords:
_______________________________________________________
Details:
OS: ubuntu15.04 desktop
```
address@hidden:~$ scheme
MIT/GNU Scheme running under GNU/Linux
Type `^C' (control-C) followed by `H' to obtain information about interrupts.
Copyright (C) 2011 Massachusetts Institute of Technology
This is free software; see the source for copying conditions. There is NO
warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
Image saved on Tuesday October 22, 2013 at 12:31:09 PM
Release 9.1.1 || Microcode 15.3 || Runtime 15.7 || SF 4.41 || LIAR/i386
4.118
Edwin 3.116
1 ]=> (define (A) (* 2 2))
;Value: a
1 ]=> A
;Value 11: #[compound-procedure 11 a]
1 ]=> a
;Value 11: #[compound-procedure 11 a]
1 ]=> (a)
;Value: ()
1 ]=> (define b (* 2 2 ))
;Value: b
1 ]=> b
;Value: 4
1 ]=> a
;Value 11: #[compound-procedure 11 a]
1 ]=> (a)
;Value: 4
1 ]=> (A)
;Value: 4
1 ]=> (define (c) (* 3 3))
;Value: c
1 ]=> c
;Value 12: #[compound-procedure 12 c]
1 ]=> (c)
;Value: 9
1 ]=>
End of input stream reached.
Moriturus te saluto.
address@hidden:~$ clear
[3;J
address@hidden:~$ scheme
MIT/GNU Scheme running under GNU/Linux
Type `^C' (control-C) followed by `H' to obtain information about interrupts.
Copyright (C) 2011 Massachusetts Institute of Technology
This is free software; see the source for copying conditions. There is NO
warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
Image saved on Tuesday October 22, 2013 at 12:31:09 PM
Release 9.1.1 || Microcode 15.3 || Runtime 15.7 || SF 4.41 || LIAR/i386
4.118
Edwin 3.116
1 ]=> (define (A) (* 2 2))
;Value: a
1 ]=> a
;Value 11: #[compound-procedure 11 a]
1 ]=> (a)
;Value: 4
1 ]=>
```
The first time I call the procedure `(a)`. the value is `()`. But after that,
this result never appeared again.
_______________________________________________________
Reply to this item at:
<http://savannah.gnu.org/bugs/?47691>
_______________________________________________
Message sent via/by Savannah
http://savannah.gnu.org/
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Bug-mit-scheme] [bug #47691] An expected result of `(define (A) (* 2 2))`,
wxw <=