[Git][cmucl/cmucl][master] 2 commits: Export more symbols in defpackage for xlib.

Raymond Toy rtoy at common-lisp.net
Sun Aug 5 01:51:09 UTC 2018


Raymond Toy pushed to branch master at cmucl / cmucl


Commits:
cb251bbe by Raymond Toy at 2018-08-05T01:46:45Z
Export more symbols in defpackage for xlib.

The compiler complained that these symbols were also being exported
from the XLIB package.  Just add them to the defpackage to silence the
warnings.

- - - - -
7c79326d by Raymond Toy at 2018-08-05T01:50:55Z
Add %UNARY-FROUND to exports of defpackage for KERNEL.

- - - - -


2 changed files:

- src/clx/package.lisp
- src/code/exports.lisp


Changes:

=====================================
src/clx/package.lisp
=====================================
--- a/src/clx/package.lisp
+++ b/src/clx/package.lisp
@@ -177,4 +177,93 @@
     wm-size-hints-user-specified-position-p wm-size-hints-user-specified-size-p
     wm-size-hints-width wm-size-hints-width-inc wm-size-hints-win-gravity
     wm-size-hints-x wm-size-hints-y wm-zoom-hints write-bitmap-file
-    write-resources xatom))
+    write-resources xatom
+    picture-subwindow-mode picture-format-id
+    mode-info-hsyncstart
+    mode-info
+    xfree86-vidmode-get-mode-line
+    picture-drawable
+    picture-alpha-y-origin
+    make-mode-info
+    shape-mask
+    xfree86-vidmode-get-viewport
+    render-query-version
+    shape-rectangles
+    xfree86-vidmode-select-next-mode
+    xfree86-vidmode-set-gamma
+    render-composite-glyphs
+    xfree86-vidmode-get-dotclocks
+    render-trapezoids
+    xfree86-vidmode-get-all-mode-lines
+    mode-info-hskew
+    picture-format-type
+    xfree86-vidmode-get-gamma-ramp
+    render-create-picture
+    picture-format-blue-byte
+    shape-query-extents
+    xfree86-vidmode-validate-mode-line
+    shape-offset
+    shape-input-selected-p
+    mode-info-vsyncend
+    shape-select-input
+    screen-saver-get-idle
+    mode-info-vtotal
+    picture-format-depth
+    picture-clip-x-origin
+    picture-format-alpha-byte
+    screen-saver-query-info
+    xfree86-vidmode-set-gamma-ramp
+    xfree86-vidmode-switch-to-mode
+    mode-info-vdisplay
+    xfree86-vidmode-delete-mode-line
+    xfree86-vidmode-set-viewport
+    picture-dither
+    picture-format-colormap
+    xfree86-vidmode-lock-mode-switch
+    render-triangles
+    xfree86-vidmode-add-mode-line
+    picture-component-alpha
+    xfree86-vidmode-get-permissions
+    shape-get-rectangles
+    shape-query-version
+    mode-info-hsyncend
+    mode-info-hdisplay
+    picture-repeat
+    picture-graphics-exposures
+    xfree86-vidmode-query-version
+    screen-saver-query-version
+    find-window-picture-format
+    render-add-glyph-from-picture
+    mode-info-private
+    xfree86-vidmode-get-gamma
+    picture-alpha-map
+    xfree86-vidmode-mod-mode-line
+    mode-info-htotal
+    render-free-picture
+    picture-poly-mode
+    picture-format-green-byte
+    render-free-glyph-set
+    render-free-glyphs
+    shape-combine
+    render-free-glyph
+    mode-info-flags
+    render-fill-rectangle
+    picture-clip-y-origin
+    mode-info-vsyncstart
+    mode-info-privsize
+    picture-poly-edge
+    render-composite
+    picture-format-red-byte
+    render-add-glyph
+    picture-format-display
+    render-reference-glyph-set
+    xfree86-vidmode-get-gamma-ramp-size
+    find-matching-picture-formats
+    mode-info-dotclock
+    xfree86-vidmode-set-client-version
+    picture-clip-mask
+    picture-alpha-x-origin
+    xfree86-vidmode-get-monitor
+    render-create-glyph-set
+    xfree86-vidmode-switch-mode
+    xfree86-vidmode-select-prev-mode))


=====================================
src/code/exports.lisp
=====================================
--- a/src/code/exports.lisp
+++ b/src/code/exports.lisp
@@ -2530,7 +2530,8 @@
            "SET-SYMBOL-VALUE-CONDITIONAL"
            "ATOMIC-POP-SYMBOL-VALUE"
            "ATOMIC-PUSHA"
-           "ATOMIC-PUSHD")
+           "ATOMIC-PUSHD"
+	   "%UNARY-FROUND")
   #+x87
   (:export "%COS-QUICK" "%SIN-QUICK" "%TAN-QUICK")
   ;;#+double-double



View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/compare/0c427fc137491327a31e997b7178efbaf7690ff4...7c79326ddbe19b5f64aef8ce78dcba1070e9d934

-- 
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/compare/0c427fc137491327a31e997b7178efbaf7690ff4...7c79326ddbe19b5f64aef8ce78dcba1070e9d934
You're receiving this email because of your account on gitlab.common-lisp.net.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cmucl-cvs/attachments/20180805/d1f9ece9/attachment-0001.html>


More information about the cmucl-cvs mailing list