Advertisement
Guest User

Untitled

a guest
Jul 7th, 2017
230
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lisp 1.19 KB | None | 0 0
  1. Unhandled memory fault at #x0.
  2.    [Condition of type SB-SYS:MEMORY-FAULT-ERROR]
  3.  
  4. Restarts:
  5.  0: [RETRY] Retry SLIME REPL evaluation request.
  6.  1: [*ABORT] Return to SLIME's top level.
  7.  2: [ABORT] abort thread (#<THREAD "repl-thread" RUNNING {1001DFFFA3}>)
  8.  
  9. Backtrace:
  10.   0: (SB-SYS:MEMORY-FAULT-ERROR)
  11.   1: ("foreign function: call_into_lisp")
  12.   2: ("foreign function: post_signal_tramp")
  13.   3: (SDL2:CREATE-RENDERER #<SDL2-FFI:SDL-WINDOW {#X7FFFEC0A7180}> NIL NIL)
  14.   4: (MAIN)
  15.   5: (SB-INT:SIMPLE-EVAL-IN-LEXENV (MAIN) #<NULL-LEXENV>)
  16.   6: (EVAL (MAIN))
  17.  --more--
  18.  
  19. ================================================
  20. А сам код такой
  21. ================================================
  22.  
  23. (defvar window nil)
  24. (defvar render nil)
  25.  
  26. (defun main ()
  27.     (sdl2:init :everything)
  28.     (setf window (sdl2:create-window :title "test" :x 100 :y 100 :w 300 :h 200))
  29.     (setf render (sdl2:create-renderer window))
  30.     (sdl2:with-event-loop (:method :poll)
  31.         (:quit
  32.          (sdl2:destroy-renderer render)
  33.          (sdl2:destroy-window window)
  34.          (sdl2:quit)
  35.          () t)
  36.         (:idle
  37.          ()
  38.          (sdl2:render-clear render)
  39.          (sdl2:render-present render))))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement