Roman Leventov leventov
leventov
/ compile
Last active
December 15, 2015 08:29
http://stackoverflow.com/questions/15595140/repa-zipwithing-over-columns
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| $ ghc -Odph -rtsopts -threaded -fno-liberate-case -funbox-strict-fields -funfolding-keeness-factor1000 -fllvm -optlo-O3 -fexpose-all-unfoldings -fsimpl-tick-factor=500 -ddump-simpl -dsuppress-all zip-columns.hs > z.hs |
leventov
/ blur-core.hs
Last active
December 12, 2015 06:38
blur.hs: inlining issue. Search `$wa2` in blur-core.hs to see details. See http://stackoverflow.com/questions/14748900/ghc-doesnt-perform-2-stage-partial-application-inlining
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| [1 of 1] Compiling Main ( blur.hs, blur.o ) | |
| ==================== Simplified expression ==================== | |
| quoteExp | |
| dim2St | |
| (unpackCString# | |
| " 2 4 5 4 2\ | |
| \ 4 9 12 9 4\ | |
| \ 5 12 15 12 5\ | |
| \ 4 9 12 9 4\ |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| -- minmax.h | |
| float max_ss(float a, float b); | |
| float min_ss(float a, float b); | |
| double max_sd(double a, double b); | |
| double min_sd(double a, double b); | |
| float clamp_ss(float x, float mn, float mx); | |
| double clamp_sd(double x, double mn, double mx); |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| .arch pentium4 | |
| .code16 | |
| .section .text | |
| .org 0x100 | |
| _gdt: .quad 0 | |
| .byte 0xFF, 0xFF, 0, 0, 0xF, 0b10011010, 0b00001111, 0 # код | |
| .byte 0xFF, 0xFF, 0, 0, 0xF, 0b10010000, 0b00001111, 0 # данные | |
| .byte 0x00, 0x80, 0,0x80, 0xB, 0b10010010, 0b00000000, 0 # видео |
NewerOlder