added intel docs
This commit is contained in:
parent
0fd967384b
commit
d7565580bf
|
@ -10,6 +10,9 @@
|
||||||
#include <errno.h>
|
#include <errno.h>
|
||||||
#include <gmp.h>
|
#include <gmp.h>
|
||||||
|
|
||||||
|
int get_all_options(){
|
||||||
|
}
|
||||||
|
|
||||||
/* get_option
|
/* get_option
|
||||||
|
|
||||||
takes pointers to argc and argv and looks for the first
|
takes pointers to argc and argv and looks for the first
|
||||||
|
|
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
BIN
lib/ikarus.boot
BIN
lib/ikarus.boot
Binary file not shown.
|
@ -1358,6 +1358,7 @@
|
||||||
;;; redo them
|
;;; redo them
|
||||||
(uncover-assigned/referenced x)))
|
(uncover-assigned/referenced x)))
|
||||||
|
|
||||||
|
|
||||||
(define (rewrite-assignments x)
|
(define (rewrite-assignments x)
|
||||||
(define who 'rewrite-assignments)
|
(define who 'rewrite-assignments)
|
||||||
(define (fix-lhs* lhs*)
|
(define (fix-lhs* lhs*)
|
||||||
|
@ -1509,6 +1510,7 @@
|
||||||
[else (error who "invalid expression ~s" (unparse x))]))
|
[else (error who "invalid expression ~s" (unparse x))]))
|
||||||
(Expr x))
|
(Expr x))
|
||||||
|
|
||||||
|
|
||||||
(define (convert-closures prog)
|
(define (convert-closures prog)
|
||||||
(define who 'convert-closures)
|
(define who 'convert-closures)
|
||||||
(define (Expr* x*)
|
(define (Expr* x*)
|
||||||
|
|
|
@ -275,5 +275,5 @@
|
||||||
(format "cat ~a > ikarus.boot"
|
(format "cat ~a > ikarus.boot"
|
||||||
(join " " (map caddr scheme-library-files))))
|
(join " " (map caddr scheme-library-files))))
|
||||||
|
|
||||||
;(#%compiler-giveup-tally)
|
(#%compiler-giveup-tally)
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue